TextView.st
changeset 1766 437d7d505a7b
parent 1765 08ec8662c842
child 1769 5e272292723b
--- a/TextView.st	Sat Mar 06 04:27:24 1999 +0100
+++ b/TextView.st	Sat Mar 06 04:28:15 1999 +0100
@@ -1414,9 +1414,9 @@
     searchBox addAbortButtonLabelled:(resources at:'cancel').
 
     bPrev := searchBox addOkButton:(Button label:(resources at:'prev')).
-    bPrev action:[self halt. fwd := false. searchBox okPressed].
+    bPrev action:[fwd := false. searchBox okPressed].
     bNext := searchBox addOkButtonLabelled:(resources at:'next').
-    bNext action:[self halt. fwd := true. "searchBox okPressed"].
+    bNext action:[fwd := true. "searchBox okPressed"].
     bPrev cursor:(bNext cursor).
 
 "/    searchBox addButton:(Button label:(resources at:'all'));
@@ -2912,5 +2912,5 @@
 !TextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.129 1999-03-06 03:27:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.130 1999-03-06 03:28:15 cg Exp $'
 ! !