DragAndDropManager.st
changeset 2070 869e370ce441
parent 2069 38bdcff6aa5c
child 2078 152102d2d8a0
--- a/DragAndDropManager.st	Wed Dec 21 12:35:21 2005 +0100
+++ b/DragAndDropManager.st	Wed Dec 21 12:36:08 2005 +0100
@@ -1311,6 +1311,8 @@
 keyPress:aKey x:x y:y view:aView
     "stop the drag operation, when the escape key is pressed"
 
+    <resource: #keyboard (#Escape)>
+
     escapePressed == true ifTrue:[ ^ self ].    "/ ignorred, escaped was pressed
 
     aKey == #Escape ifTrue:[
@@ -1569,7 +1571,7 @@
 !DragAndDropManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/DragAndDropManager.st,v 1.65 2005-12-21 11:35:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/DragAndDropManager.st,v 1.66 2005-12-21 11:36:08 cg Exp $'
 ! !
 
 DragAndDropManager initialize!