SelectionInListView.st
changeset 1217 f06721aceb8f
parent 1204 8cbd65c6ddac
child 1235 23748485375c
--- a/SelectionInListView.st	Tue May 06 09:30:32 1997 +0200
+++ b/SelectionInListView.st	Tue May 06 09:32:17 1997 +0200
@@ -1359,9 +1359,11 @@
         wasEnabled := enabled
     ].
     enableChannel := aValueHolder.
-    aValueHolder onChangeSend:#enableStateChange to:self.
-    enableChannel value ~~ wasEnabled ifTrue:[
-        self enableStateChange
+    aValueHolder notNil ifTrue:[
+        aValueHolder onChangeSend:#enableStateChange to:self.
+        enableChannel value ~~ wasEnabled ifTrue:[
+            self enableStateChange
+        ]
     ]
 
     "Modified: 30.4.1996 / 15:10:03 / cg"
@@ -3282,5 +3284,5 @@
 !SelectionInListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.104 1997-04-26 11:46:20 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.105 1997-05-06 07:32:17 ca Exp $'
 ! !