strange that it was removed.
Le 24/3/15 09:21, Stephan Eggermont a écrit :
In Issue 13739, build 40145 classesInTheSelectedPackage in Nautilus
was removed. What is the correct way to replace it? WABrowser uses a
nautilus browser to show a web-based browser.
(build 609, Seaside #'release3.1' pharo4, from ci)
WABrowserTest>>testContentsNotifying
| model |
model := WABrowser browserClass new.
model systemCategoryListIndex: (model systemCategoryList indexOf:
'Seaside-Tests-Pharo-Development').
model classListIndex: (model classList indexOf: #WABrowserTest).
model messageCategoryListIndex: (model messageCategoryList
indexOf: #'-- all --').
[
self assert:
(model contents: 'sampleMethod
^ 1 + 1'
notifying: self).
self assert: message isNil ]
ensure: [ WABrowserTest removeSelectorSilently: #sampleMethod ]
Stephan