--- a/JavaView.st Thu Feb 05 15:46:06 1998 +0000
+++ b/JavaView.st Fri Feb 06 00:00:57 1998 +0000
@@ -49,7 +49,7 @@
buttonMotion:state x:x y:y
|ev|
-'JavaView buttonMotion' printCR.
+"/ 'JavaView buttonMotion' printCR.
eventReceiver notNil ifTrue:[
ev := WindowEvent buttonEvent
@@ -60,13 +60,13 @@
].
"Created: / 23.8.1997 / 03:13:38 / cg"
- "Modified: / 8.1.1998 / 17:59:42 / cg"
+ "Modified: / 6.2.1998 / 00:56:52 / cg"
!
buttonPress:button x:x y:y
|ev|
-'JavaView buttonPress' printCR.
+"/ 'JavaView buttonPress' printCR.
eventReceiver notNil ifTrue:[
ev := WindowEvent buttonEvent
@@ -77,13 +77,13 @@
].
"Created: / 21.8.1997 / 19:37:57 / cg"
- "Modified: / 8.1.1998 / 17:59:32 / cg"
+ "Modified: / 6.2.1998 / 00:56:56 / cg"
!
buttonRelease:button x:x y:y
|ev|
-'JavaView buttonRelease' printCR.
+"/ 'JavaView buttonRelease' printCR.
eventReceiver notNil ifTrue:[
ev := WindowEvent buttonEvent
@@ -94,13 +94,13 @@
].
"Created: / 23.8.1997 / 02:22:23 / cg"
- "Modified: / 8.1.1998 / 17:59:25 / cg"
+ "Modified: / 6.2.1998 / 00:57:00 / cg"
!
exposeX:x y:y width:w height:h
|ev|
-'JavaView expose' printCR.
+"/ 'JavaView expose' printCR.
updateRegions isNil ifTrue:[
updateRegions := OrderedCollection new.
@@ -115,13 +115,13 @@
super exposeX:x y:y width:w height:h
"Created: / 18.8.1997 / 15:00:24 / cg"
- "Modified: / 8.1.1998 / 17:59:11 / cg"
+ "Modified: / 6.2.1998 / 00:57:04 / cg"
!
keyPress:key x:x y:y
|ev|
-'JavaView keyPress' printCR.
+"/ 'JavaView keyPress' printCR.
eventReceiver notNil ifTrue:[
ev := WindowEvent keyboardEvent
@@ -132,24 +132,24 @@
].
"Created: / 8.1.1998 / 18:01:55 / cg"
- "Modified: / 4.2.1998 / 00:12:27 / cg"
+ "Modified: / 6.2.1998 / 00:57:08 / cg"
!
keyRelease:key x:x y:y
|ev|
-'JavaView keyRelease' printCR.
+"/ 'JavaView keyRelease' printCR.
eventReceiver notNil ifTrue:[
- ev := WindowEvent buttonEvent
+ ev := WindowEvent keyboardEvent
for:self
type:#keyRelease:x:y:
arguments:(Array with:key with:x with:y).
eventReceiver processEvent:ev.
].
- "Modified: / 8.1.1998 / 17:59:32 / cg"
"Created: / 8.1.1998 / 18:02:03 / cg"
+ "Modified: / 6.2.1998 / 00:57:16 / cg"
! !
!JavaView methodsFor:'initialization'!
@@ -170,5 +170,5 @@
!JavaView class methodsFor:'documentation'!
version
- ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaView.st,v 1.10 1998/02/05 11:02:16 cg Exp $'
+ ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaView.st,v 1.11 1998/02/06 00:00:03 cg Exp $'
! !