--- a/LinkButtonController.st	Mon Mar 09 14:34:37 2009 +0100
+++ b/LinkButtonController.st	Mon Mar 09 14:34:48 2009 +0100
@@ -8,10 +8,18 @@
 !
 
 
+!LinkButtonController methodsFor:'accessing'!
+
+lastMousePoint
+    ^ lastX @ lastY
+! !
+
 !LinkButtonController methodsFor:'event handling'!
 
 buttonMotion:buttonState x:x y:y
-    super buttonMotion:buttonState x:x y:y
+    lastX := x.
+    lastY := y.
+    super buttonMotion:buttonState x:x y:y.
 !
 
 buttonPress:button x:x y:y
@@ -29,5 +37,5 @@
 !LinkButtonController class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/LinkButtonController.st,v 1.1 2009-03-05 21:19:29 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/LinkButtonController.st,v 1.2 2009-03-09 13:34:48 cg Exp $'
 ! !