DirectoryContentsBrowser.st
changeset 11592 d4637b4237ea
parent 11460 0669e11fb7fb
child 12061 8250241997b8
--- a/DirectoryContentsBrowser.st	Wed Jul 11 19:53:40 2012 +0200
+++ b/DirectoryContentsBrowser.st	Thu Jul 12 12:17:19 2012 +0200
@@ -2492,7 +2492,7 @@
     showDir := self viewDirsInContentsBrowser value.
     showFiles := self viewFilesInContentsBrowser value.
     
-    filterBlock := self matchBlock.
+    filterBlock := self matchBlock ? [:v1 :v2 | true ].
     newItemList := anItemsList 
                         select:[:eachItem |
                             |isDir showIt|
@@ -2515,7 +2515,7 @@
     self noOfShownFiles:noOfShownFiles noOfFiles:noOfFiles.
     ^ newItemList
 
-    "Modified: / 20-03-2012 / 12:09:10 / cg"
+    "Modified: / 12-07-2012 / 11:56:59 / cg"
 !
 
 filterChanged
@@ -3412,9 +3412,9 @@
 !DirectoryContentsBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.247 2012-03-23 13:51:09 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.248 2012-07-12 10:17:19 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.247 2012-03-23 13:51:09 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.248 2012-07-12 10:17:19 cg Exp $'
 ! !