--- a/DeviceWorkstation.st	Thu Nov 17 22:10:31 2016 +0100
+++ b/DeviceWorkstation.st	Thu Nov 17 22:51:22 2016 +0100
@@ -1274,13 +1274,15 @@
     |pos|
 
     self waitButton.
-    pos := self cursorPoint.
+    pos := self pointerPosition.
     self waitNoButton.
     ^ pos
 
     "
      Sensor waitClickButton.
     "
+
+    "Modified: / 17-11-2016 / 22:10:39 / cg"
 !
 
 waitNoButton