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





Reply via email to