--- a/UnitConverter.st Wed Dec 17 21:17:07 2014 +0100
+++ b/UnitConverter.st Thu Dec 18 09:55:11 2014 +0100
@@ -872,6 +872,10 @@
|unitString n|
+ nBytes isNil ifTrue:[
+ ^ '-'
+ ].
+
nBytes < (1000 * 1024 * 1024 * 1024) ifTrue:[
nBytes < (1000 * 1024 * 1024) ifTrue:[
nBytes < (1000 * 1024) ifTrue:[
@@ -911,6 +915,7 @@
^ n printString , unitString.
"
+ self fileSizeStringFor:nil
self fileSizeStringFor:10
self fileSizeStringFor:100
self fileSizeStringFor:1000
@@ -931,6 +936,7 @@
"
"Modified: / 17-12-2013 / 16:55:17 / cg"
+ "Modified (comment): / 18-12-2014 / 09:54:33 / sr"
!
frequencyFromString:frequencyString
@@ -1158,10 +1164,10 @@
!UnitConverter class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic2/UnitConverter.st,v 1.44 2013-12-17 15:58:58 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic2/UnitConverter.st,v 1.45 2014-12-18 08:55:11 sr Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic2/UnitConverter.st,v 1.44 2013-12-17 15:58:58 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic2/UnitConverter.st,v 1.45 2014-12-18 08:55:11 sr Exp $'
! !