--- a/DirectoryContentsBrowser.st Wed Feb 28 15:41:14 2007 +0100
+++ b/DirectoryContentsBrowser.st Wed Feb 28 15:41:21 2007 +0100
@@ -1177,17 +1177,15 @@
|info filterBox clr|
- noOfAddedFiles = noOfFiles ifTrue:[
- info := '%1 file%3'.
- ] ifFalse:[
- info := '%1 file%3 (%2 total)'.
+ info := (noOfAddedFiles == 1 ifTrue:['%1 file'] ifFalse:['%1 files']).
+ noOfAddedFiles = noOfFiles ifFalse:[
+ info := info,' (%2 total)'.
].
self shownFiles
value:(resources
string:info
with:noOfAddedFiles
- with:noOfFiles
- with:(noOfAddedFiles == 1 ifTrue:[''] ifFalse:['s'])).
+ with:noOfFiles).
filterBox := self filterValueBox value.
filterBox isNil ifTrue:[^ self ].
@@ -3264,5 +3262,5 @@
!DirectoryContentsBrowser class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.203 2007-02-07 21:12:26 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.204 2007-02-28 14:41:21 cg Exp $'
! !