--- a/AbstractTime.st	Mon Nov 10 16:53:30 2014 +0100
+++ b/AbstractTime.st	Mon Nov 10 17:33:14 2014 +0100
@@ -487,6 +487,7 @@
     "
 ! !
 
+
 !AbstractTime methodsFor:'abstract'!
 
 hours
@@ -592,7 +593,7 @@
 
     ^ aNumberOrTimeDuration sumFromTimestamp:self.
 
-"/    ^ self species basicNew 
+"/    ^ self speciesNew 
 "/        setMilliseconds:(self getMilliseconds + (aNumberOrTimeDuration * 1000) asInteger)
 
     "
@@ -667,7 +668,7 @@
 addMilliseconds:numberOfMilliSeconds
     "return a new instance of myself, numberOfMilliSeconds afterwards."
 
-    ^ self species basicNew 
+    ^ self speciesNew 
         setMilliseconds:(self getMilliseconds + numberOfMilliSeconds)
 
     "
@@ -712,7 +713,7 @@
 addSeconds:numberOfSeconds
     "return a new instance of myself, numberOfSeconds afterwards."
 
-    ^ self species basicNew 
+    ^ self speciesNew 
         setMilliseconds:(self getMilliseconds + (numberOfSeconds * 1000))
 
     "
@@ -825,7 +826,7 @@
 subtractMilliseconds:numberOfMilliSeconds
     "return a new instance of myself, numberOfMilliSeconds before."
 
-    ^ self species basicNew 
+    ^ self speciesNew 
         setMilliseconds:(self getMilliseconds - numberOfMilliSeconds)
 
     "
@@ -870,7 +871,7 @@
 subtractSeconds:numberOfSeconds
     "return a new instance of myself, numberOfSeconds before."
 
-    ^ self species basicNew 
+    ^ self speciesNew 
         setMilliseconds:(self getMilliseconds - (numberOfSeconds * 1000))
 
     "
@@ -1396,15 +1397,19 @@
      represented), this must be done by a concrete class."
 
     ^ self subclassResponsibility
+!
+
+speciesNew
+    ^ self species basicNew
 ! !
 
 !AbstractTime class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/AbstractTime.st,v 1.87 2014-11-07 21:23:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/AbstractTime.st,v 1.88 2014-11-10 16:33:14 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/AbstractTime.st,v 1.87 2014-11-07 21:23:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/AbstractTime.st,v 1.88 2014-11-10 16:33:14 cg Exp $'
 ! !