--- a/XWorkstation.st	Fri Dec 07 16:57:04 2001 +0100
+++ b/XWorkstation.st	Fri Dec 07 17:10:53 2001 +0100
@@ -9473,7 +9473,7 @@
      May be used to detect slow X11 connections"
 
     self sync.
-    ^ Time millisecondsToRun:[ self primSync ].
+    ^ AbsoluteTime millisecondsToRun:[ self primSync ].
 
     "
      Screen current roundTripTime
@@ -11644,6 +11644,6 @@
 !XWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.401 2001-12-07 15:57:04 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.402 2001-12-07 16:10:53 stefan Exp $'
 ! !
 XWorkstation initialize!