Mercurial Mercurial > hg > stx-libtool / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
authorpenk
Wed, 16 Oct 2002 18:24:46 +0200
changeset 4012 fa4418738475
parent 4011 73fa35b1963b
child 4013 049b94940308
*** empty log message ***
DirectoryContentsBrowser.st file | annotate | diff | comparison | revisions 
--- a/DirectoryContentsBrowser.st	Wed Oct 16 17:07:50 2002 +0200
+++ b/DirectoryContentsBrowser.st	Wed Oct 16 18:24:46 2002 +0200
@@ -1002,7 +1002,7 @@
         self directory:nil.
         ^ self
     ].
-    wantSelectFiles := aColOfFiles. "/ set the file to the current filename to change selection if update process have added the list
+    wantSelectFiles := aColOfFiles select:[:file| file isDirectory not]. "/ set the file to the current filename to change selection if update process have added the list
     newDir := self currentDirectories value first.
     currentDir := self directory.
     newDir = currentDir ifTrue:[
@@ -2548,5 +2548,5 @@
 !DirectoryContentsBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.26 2002-10-16 15:07:06 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.27 2002-10-16 16:24:46 penk Exp $'
 ! !
hg/stx-libtool