#TUNING by stefan
class: TypeConverter
changed:
#numberOrNilToTextMinValue:maxValue:format:
#numberWithOptionalScales:
--- a/TypeConverter.st Fri Sep 14 14:54:17 2018 +0200
+++ b/TypeConverter.st Fri Sep 14 17:06:30 2018 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"
COPYRIGHT (c) 1997 eXept Software AG
All Rights Reserved
@@ -1580,7 +1582,7 @@
|value c|
- (string isEmptyOrNil or:[string isBlank]) ifTrue:[
+ (string isNil or:[string isBlank]) ifTrue:[
value := nil
] ifFalse:[
value := Number readFromString:string onError:[nil].
@@ -1602,7 +1604,8 @@
updateBlock: [:m :a :p | true]
- "Modified: 21.2.1997 / 18:59:44 / cg"
+ "Modified: / 21-02-1997 / 18:59:44 / cg"
+ "Modified: / 14-09-2018 / 10:08:59 / Stefan Vogel"
!
numberOrPointOrNil
@@ -1954,7 +1957,7 @@
|value c stream scaleChar scale partValue|
- (string isEmptyOrNil or:[string isBlank]) ifTrue:[
+ (string isNil or:[string isBlank]) ifTrue:[
value := nil
] ifFalse:[
value := 0.
@@ -1973,6 +1976,8 @@
]
updateBlock: [:m :a :p | true]
+
+ "Modified: / 14-09-2018 / 10:09:09 / Stefan Vogel"
!
numberWithOptionalScales:scaleDict andThousandsSeparator:sep