# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1315227808 -7200
# Node ID 09ee3dad124c4b887d2497d8605699a04c036ea0
# Parent  82875f651ca638255af9f1e9350b01889ec0ca40
added: #asMilliseconds

diff -r 82875f651ca6 -r 09ee3dad124c Time.st
--- a/Time.st	Mon Sep 05 11:19:51 2011 +0200
+++ b/Time.st	Mon Sep 05 15:03:28 2011 +0200
@@ -298,6 +298,12 @@
 
 !Time methodsFor:'Compatibility-Squeak'!
 
+asMilliseconds
+    ^ self asMilliSeconds
+
+    "Created: / 05-09-2011 / 14:56:36 / cg"
+!
+
 intervalString
     "Treat the time as a difference.  
      Give it in hours and minutes with two digits of accuracy."
@@ -801,9 +807,9 @@
 !Time class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Time.st,v 1.91 2011-09-05 08:57:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Time.st,v 1.92 2011-09-05 13:03:28 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Time.st,v 1.91 2011-09-05 08:57:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Time.st,v 1.92 2011-09-05 13:03:28 cg Exp $'
 ! !