class: SimpleView
authorClaus Gittinger <cg@exept.de>
Mon, 04 May 2015 01:18:53 +0200
changeset 6851 4c1547ff5459
parent 6850 269b832e38c7
child 6852 a23f54ff0fd7
child 6853 541c6d924a41
class: SimpleView comment/format in: #simulateButtonPress:at: #simulateButtonRelease:at:
SimpleView.st
--- a/SimpleView.st	Sun May 03 22:45:27 2015 +0200
+++ b/SimpleView.st	Mon May 04 01:18:53 2015 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -6673,7 +6675,7 @@
     |ev|
 
     ev := WindowEvent buttonPress:button x:0 y:0 view:self.
-    "/ x/y will be set in method below
+    "/ x/y will be set in simulateUserEvent:ev at:aPoint
     ^ self simulateUserEvent:ev at:aPoint
 
     "Created: / 12-07-2011 / 14:36:02 / cg"
@@ -6687,7 +6689,7 @@
     |ev|
 
     ev := WindowEvent buttonRelease:button x:0 y:0 view:self.
-    "/ x/y will be set in method below
+    "/ x/y will be set in simulateUserEvent:ev at:aPoint
     ^ self simulateUserEvent:ev at:aPoint
 
     "Created: / 12-07-2011 / 14:54:37 / cg"
@@ -11385,11 +11387,11 @@
 !SimpleView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.783 2015-04-24 09:28:08 mb Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.784 2015-05-03 23:18:53 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.783 2015-04-24 09:28:08 mb Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.784 2015-05-03 23:18:53 cg Exp $'
 !
 
 version_SVN