JavaView.st
changeset 563 a449d76e4182
parent 545 6a841644c5e9
child 596 1649256b9b6d
--- a/JavaView.st	Mon Jun 07 11:51:44 1999 +0000
+++ b/JavaView.st	Mon Jun 07 12:17:39 1999 +0000
@@ -98,6 +98,13 @@
                  for:self
                  type:#buttonMotion:x:y:
                  arguments:(Array with:state with:x with:y).
+        ev hasShift:self sensor shiftDown
+           ctrl:self sensor ctrlDown
+           alt:self sensor altDown      
+           meta:self sensor metaDown
+           button1:self sensor leftButtonPressed
+           button2:self sensor middleButtonPressed 
+           button3:self sensor rightButtonPressed.
         eventReceiver processEvent:ev.
     ].
 
@@ -117,6 +124,13 @@
                  for:self
                  type:#buttonPress:x:y:
                  arguments:(Array with:button with:x with:y).
+        ev hasShift:self sensor shiftDown
+           ctrl:self sensor ctrlDown
+           alt:self sensor altDown      
+           meta:self sensor metaDown
+           button1:self sensor leftButtonPressed
+           button2:self sensor middleButtonPressed 
+           button3:self sensor rightButtonPressed.
         eventReceiver processEvent:ev.
     ].
 
@@ -136,6 +150,14 @@
                  for:self
                  type:#buttonRelease:x:y:
                  arguments:(Array with:button with:x with:y).
+
+        ev hasShift:self sensor shiftDown
+           ctrl:self sensor ctrlDown
+           alt:self sensor altDown      
+           meta:self sensor metaDown
+           button1:self sensor leftButtonPressed
+           button2:self sensor middleButtonPressed 
+           button3:self sensor rightButtonPressed.
         eventReceiver processEvent:ev.
     ].
 
@@ -230,5 +252,5 @@
 !JavaView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaView.st,v 1.18 1999/01/29 15:30:29 cg Exp $'
+    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaView.st,v 1.19 1999/06/07 12:17:39 cg Exp $'
 ! !