--- a/AbstractTime.st	Sat Jun 06 06:39:31 2015 +0200
+++ b/AbstractTime.st	Sun Jun 07 06:38:49 2015 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1995 by Claus Gittinger
               All Rights Reserved
@@ -287,6 +289,7 @@
     ^ '%h:%m:%s'
 ! !
 
+
 !AbstractTime class methodsFor:'private-instance creation'!
 
 fromOSTime:osTime
@@ -369,6 +372,24 @@
     "Modified: 1.7.1996 / 15:20:14 / cg"
 ! !
 
+!AbstractTime class methodsFor:'reading'!
+
+readFrom:aStringOrStream format:formatString
+    "see format description in readFrom:format:language:onError:"
+
+    ^ self 
+        readFrom:aStringOrStream format:formatString language:nil 
+        onError:[
+            self conversionErrorSignal raiseErrorString:'Timestamp format error'
+        ].
+!
+
+readFrom:aStringOrStream format:formatString onError:exceptionalValue
+    "see format description in readFrom:format:language:onError:"
+
+    ^ self readFrom:aStringOrStream format:formatString language:nil onError:exceptionalValue
+! !
+
 !AbstractTime class methodsFor:'timing evaluations'!
 
 microsecondsToRun:aBlock
@@ -1439,10 +1460,10 @@
 !AbstractTime class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/AbstractTime.st,v 1.91 2015-02-03 19:01:47 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/AbstractTime.st,v 1.92 2015-06-06 12:56:45 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/AbstractTime.st,v 1.91 2015-02-03 19:01:47 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/AbstractTime.st,v 1.92 2015-06-06 12:56:45 cg Exp $'
 ! !