AbstractTime.st
branchjv
changeset 19899 25b35b705da5
parent 19662 1d6b7f21e0aa
parent 19894 c03dc72fc13b
child 20206 51652e7f46dd
--- a/AbstractTime.st	Fri May 20 06:45:01 2016 +0200
+++ b/AbstractTime.st	Mon May 23 07:53:04 2016 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1995 by Claus Gittinger
               All Rights Reserved
@@ -384,10 +382,14 @@
     ^ self 
         readFrom:aStringOrStream format:formatString language:nil 
         onError:[
-            self conversionErrorSignal raiseErrorString:'Timestamp format error'
+            self conversionErrorSignal raiseErrorString:' - Timestamp format error'
         ].
 !
 
+readFrom:aStringOrStream format:formatString language:languageString onError:exceptionalValue
+    ^ self subclassResponsibility
+!
+
 readFrom:aStringOrStream format:formatString onError:exceptionalValue
     "see format description in readFrom:format:language:onError:"
 
@@ -1036,6 +1038,7 @@
     "/ ^ aTimestamp getSeconds - self getSeconds
 ! !
 
+
 !AbstractTime methodsFor:'printing & storing'!
 
 addBasicPrintBindingsTo:aDictionary language:languageOrNil