slight code cleanup
authorClaus Gittinger <cg@exept.de>
Wed, 20 Apr 2005 11:25:36 +0200
changeset 6265 19f8b1250d41
parent 6264 039dc5c1710b
child 6266 15c3122497ff
slight code cleanup
AbstractFileBrowser.st
--- a/AbstractFileBrowser.st	Wed Apr 20 11:24:29 2005 +0200
+++ b/AbstractFileBrowser.st	Wed Apr 20 11:25:36 2005 +0200
@@ -5566,10 +5566,9 @@
     selectedFiles := self currentFileNameHolder value.
     (numFiles := selectedFiles size) == 0 ifTrue:[^ self].
 
-    msg := 'Split %2 into pieces of size (in kB):'.
-    numFiles > 1 ifTrue:[
-        msg := 'Split each of the %1 files into pieces of size (in kB):'.
-    ].
+    msg := (numFiles > 1) 
+                ifTrue:'Split each of the %1 files into pieces of size (in kB):'
+                ifFalse:'Split %2 into pieces of size (in kB):'.
 
     sizeString := Dialog 
         request:(msg bindWith:numFiles with:selectedFiles first baseName) withCRs.
@@ -5584,6 +5583,8 @@
         ]
     ].
     self notify:nil.
+
+    "Modified: / 20-04-2005 / 11:25:11 / cg"
 !
 
 truncateSelectedFilesToZeroSize
@@ -6608,5 +6609,5 @@
 !AbstractFileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.287 2005-04-20 09:24:29 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.288 2005-04-20 09:25:36 cg Exp $'
 ! !