--- a/AbstractFileBrowser.st Thu Mar 11 00:57:35 2010 +0100
+++ b/AbstractFileBrowser.st Thu Mar 11 15:20:53 2010 +0100
@@ -7522,10 +7522,8 @@
" aspect for sort caseless "
^ self aspectFor:#sortCaseless ifAbsent:[
- | holder |
- holder := (Filename isCaseSensitive not) asValue.
- holder
- ]
+ (Filename isCaseSensitive not) asValue.
+ ]
!
sortDirectoriesBeforeFiles
@@ -7986,9 +7984,9 @@
!AbstractFileBrowser class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.434 2010-02-02 14:34:54 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.435 2010-03-11 14:20:53 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.434 2010-02-02 14:34:54 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.435 2010-03-11 14:20:53 cg Exp $'
! !