*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Fri, 02 Feb 1996 17:27:00 +0100
changeset 346 9ee1f936b7ea
parent 345 3bb0d27efc7a
child 347 acfb4dcd3017
*** empty log message ***
FBrowser.st
FileBrowser.st
--- a/FBrowser.st	Thu Feb 01 21:02:43 1996 +0100
+++ b/FBrowser.st	Fri Feb 02 17:27:00 1996 +0100
@@ -927,6 +927,11 @@
     super destroy
 !
 
+filterPatternChanged
+    fileListView scrollToTop. 
+    self updateCurrentDirectory
+!
+
 terminate
     "exit FileBrowser"
 
@@ -2383,4 +2388,4 @@
 !FileBrowser class methodsFor:'documentation'!
 
 version
-^ '$Header: /cvs/stx/stx/libtool/Attic/FBrowser.st,v 1.68 1996-02-01 19:51:34 cg Exp $'! !
+^ '$Header: /cvs/stx/stx/libtool/Attic/FBrowser.st,v 1.69 1996-02-02 16:27:00 cg Exp $'! !
--- a/FileBrowser.st	Thu Feb 01 21:02:43 1996 +0100
+++ b/FileBrowser.st	Fri Feb 02 17:27:00 1996 +0100
@@ -927,6 +927,11 @@
     super destroy
 !
 
+filterPatternChanged
+    fileListView scrollToTop. 
+    self updateCurrentDirectory
+!
+
 terminate
     "exit FileBrowser"
 
@@ -2383,4 +2388,4 @@
 !FileBrowser class methodsFor:'documentation'!
 
 version
-^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.68 1996-02-01 19:51:34 cg Exp $'! !
+^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.69 1996-02-02 16:27:00 cg Exp $'! !