only trigger accept channel, if there is a model.
authorClaus Gittinger <cg@exept.de>
Thu, 08 Feb 2001 11:40:07 +0100
changeset 2344 da0c69b10f2f
parent 2343 98db291c8d8a
child 2345 3b69631b179b
only trigger accept channel, if there is a model.
EditTextView.st
--- a/EditTextView.st	Mon Jan 29 14:29:43 2001 +0100
+++ b/EditTextView.st	Thu Feb 08 11:40:07 2001 +0100
@@ -935,7 +935,9 @@
 
     "/ self accepted:true.
     "/ changed to:
-    acceptChannel value:true withoutNotifying:self.
+    model notNil ifTrue:[
+        acceptChannel value:true withoutNotifying:self.
+    ].
 
     lockUpdates := false.
 
@@ -4929,5 +4931,5 @@
 !EditTextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.243 2000-12-19 16:15:59 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.244 2001-02-08 10:40:07 cg Exp $'
 ! !