UISelectionPanel.st
changeset 1500 36c0b4b268b8
parent 1475 b2191c13ed37
child 1549 345226e6e7d2
--- a/UISelectionPanel.st	Wed Oct 10 11:44:41 2001 +0200
+++ b/UISelectionPanel.st	Wed Oct 10 15:11:42 2001 +0200
@@ -1455,8 +1455,8 @@
     device := gallery device.
 
     point  := device translatePoint:(device pointerPosition)
-                               from:(device rootWindowId)
-                                 to:(gallery canvas id).
+                           fromView:nil
+                             toView:(gallery canvas).
 
     point y < 1 ifTrue:[point y:1].
     ext := gallery extent - (10@10).
@@ -1475,6 +1475,8 @@
         point := point + (20@20).
     ].
     gallery update.
+
+    "Modified: / 10.10.2001 / 14:14:36 / cg"
 !
 
 raiseMenu