--- a/ChangesBrowser.st	Mon Jan 20 17:10:48 2003 +0100
+++ b/ChangesBrowser.st	Mon Jan 20 18:22:55 2003 +0100
@@ -4772,6 +4772,9 @@
 !
 
 findNextForString
+    lastSearchString isNil ifTrue:[
+        ^ self findString
+    ].
     self findNextWithString:lastSearchString
 !
 
@@ -4925,6 +4928,9 @@
 !
 
 findPreviousForString
+    lastSearchString isNil ifTrue:[
+        ^ self findString
+    ].
     self findPreviousWithString:lastSearchString
 !
 
@@ -5130,5 +5136,5 @@
 !ChangesBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.281 2003-01-10 11:35:42 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.282 2003-01-20 17:22:55 cg Exp $'
 ! !