fixed update for acceptChannel
authorClaus Gittinger <cg@exept.de>
Sun, 01 Feb 1998 13:15:12 +0100
changeset 1438 bed1564b0640
parent 1437 ab84b08a9f9c
child 1439 d1b3ca91ed8a
fixed update for acceptChannel
ETxtView.st
EditTextView.st
--- a/ETxtView.st	Fri Jan 30 15:21:51 1998 +0100
+++ b/ETxtView.st	Sun Feb 01 13:15:12 1998 +0100
@@ -753,15 +753,14 @@
 !
 
 update:something with:aParameter from:changedObject
-    something == acceptChannel ifTrue:[
-self halt.
+    changedObject == acceptChannel ifTrue:[
         self accept.
         ^ self.
     ].
     super update:something with:aParameter from:changedObject
 
     "Created: / 30.1.1998 / 14:15:56 / cg"
-    "Modified: / 30.1.1998 / 14:16:39 / cg"
+    "Modified: / 30.1.1998 / 15:44:50 / cg"
 ! !
 
 !EditTextView methodsFor:'cursor handling'!
@@ -4174,5 +4173,5 @@
 !EditTextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Attic/ETxtView.st,v 1.144 1998-01-30 14:21:51 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/ETxtView.st,v 1.145 1998-02-01 12:15:12 cg Exp $'
 ! !
--- a/EditTextView.st	Fri Jan 30 15:21:51 1998 +0100
+++ b/EditTextView.st	Sun Feb 01 13:15:12 1998 +0100
@@ -753,15 +753,14 @@
 !
 
 update:something with:aParameter from:changedObject
-    something == acceptChannel ifTrue:[
-self halt.
+    changedObject == acceptChannel ifTrue:[
         self accept.
         ^ self.
     ].
     super update:something with:aParameter from:changedObject
 
     "Created: / 30.1.1998 / 14:15:56 / cg"
-    "Modified: / 30.1.1998 / 14:16:39 / cg"
+    "Modified: / 30.1.1998 / 15:44:50 / cg"
 ! !
 
 !EditTextView methodsFor:'cursor handling'!
@@ -4174,5 +4173,5 @@
 !EditTextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.144 1998-01-30 14:21:51 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.145 1998-02-01 12:15:12 cg Exp $'
 ! !