--- a/display.rc Wed Jun 05 16:38:30 2013 +0200
+++ b/display.rc Wed Jul 10 10:07:44 2013 +0200
@@ -210,16 +210,16 @@
display := OperatingSystem getHostName.
] ifFalse:[
[(displayVar size > 1) and:[displayVar last isDigit]] whileTrue:[
- displayVar := displayVar copyWithoutLast:1.
+ displayVar := displayVar copyButLast:1.
].
((displayVar size > 1) and:[displayVar last == $.]) ifTrue:[
- displayVar := displayVar copyWithoutLast:1.
+ displayVar := displayVar copyButLast:1.
[(displayVar size > 1) and:[displayVar last isDigit]] whileTrue:[
- displayVar := displayVar copyWithoutLast:1.
+ displayVar := displayVar copyButLast:1.
].
].
((displayVar size > 1) and:[displayVar last == $:]) ifTrue:[
- display := displayVar copyWithoutLast:1
+ display := displayVar copyButLast:1
]
].
].