--- 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 $'
! !