The documentation for button-down in version .89 says a button-down
tuple has two slots: a sequence of modifiers and a button number.
However it appears there is actually a third parameter between these two
as the following code demonstrates T{ button-down f f 1 } works but T{
button-down f 1 } does not:
USING: kernel gadgets math sequences io ;
TUPLE: test-gadget ;
C: test-gadget ( -- gadget )
[ delegate>gadget ] keep ;
M: test-gadget pref-dim* ( gadget -- dim ) drop { 250 250 } ;
test-gadget H{
{ T{ button-down f f 1 } [ "Button # 1." print ] }
} set-gestures
: run-test ( -- ) <test-gadget> "Test" open-window ;
-------------------------------------------------------------------------
This SF.net email is sponsored by DB2 Express
Download DB2 Express C - the FREE version of DB2 express and take
control of your XML. No limits. Just data. Click to get it now.
http://sourceforge.net/powerbar/db2/
_______________________________________________
Factor-talk mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/factor-talk
