--- a/SelectionBrowser.st Wed Nov 15 11:35:31 2000 +0100
+++ b/SelectionBrowser.st Wed Nov 15 13:35:24 2000 +0100
@@ -12,6 +12,8 @@
+"{ Package: 'stx:libtool2' }"
+
SimpleDialog subclass:#SelectionBrowser
instanceVariableNames:'title'
classVariableNames:''
@@ -76,11 +78,11 @@
!SelectionBrowser class methodsFor:'queries'!
isVisualStartable
- "returns whether this application class can be started via #open"
+ "return true, if this application can be started via #open.
+ (to allow start of a change browser via double-click in the browser)"
self == SelectionBrowser ifTrue:[^false].
^super isVisualStartable
-
! !
!SelectionBrowser methodsFor:'accessing'!