equal
deleted
inserted
replaced
77 |
77 |
78 ^ super buttonMotion:buttonAndModifierState x:x y:y view:aView |
78 ^ super buttonMotion:buttonAndModifierState x:x y:y view:aView |
79 ! |
79 ! |
80 |
80 |
81 buttonPress:button x:x y:y view:aView |
81 buttonPress:button x:x y:y view:aView |
82 aView == currentHelpView ifTrue:[ |
82 self hideHelp. |
83 self hideHelp. |
83 "/ aView == currentHelpView ifTrue:[ |
84 ^ true |
84 "/ self hideHelp. |
85 ]. |
85 "/ ^ true |
|
86 "/ ]. |
86 ^ super buttonPress:button x:x y:y view:aView |
87 ^ super buttonPress:button x:x y:y view:aView |
|
88 |
|
89 "Modified: / 23-12-2011 / 20:37:28 / cg" |
87 ! |
90 ! |
88 |
91 |
89 keyPress:key x:x y:y view:aView |
92 keyPress:key x:x y:y view:aView |
90 currentHelpView notNil ifTrue:[ |
93 currentHelpView notNil ifTrue:[ |
91 "/ generate a line suitable for the resources file |
94 "/ generate a line suitable for the resources file |
377 ! ! |
380 ! ! |
378 |
381 |
379 !FlyByHelp class methodsFor:'documentation'! |
382 !FlyByHelp class methodsFor:'documentation'! |
380 |
383 |
381 version_CVS |
384 version_CVS |
382 ^ '$Header: /cvs/stx/stx/libview2/FlyByHelp.st,v 1.49 2011-07-13 13:15:21 cg Exp $' |
385 ^ '$Header: /cvs/stx/stx/libview2/FlyByHelp.st,v 1.50 2011-12-25 09:23:49 cg Exp $' |
383 ! ! |
386 ! ! |