Remove unused word

slava 2006-12-01 07:53:11 +00:00
parent 65ffafc3f8
commit 4877e21ddc
1 changed files with 0 additions and 3 deletions

View File

@ -39,9 +39,6 @@ TUPLE: paste-action ;
TUPLE: delete-action ;
TUPLE: select-all-action ;
: handle-action ( gadget constructor -- )
execute swap send-gesture drop ; inline
: generalize-gesture ( gesture -- gesture )
#! Strip button number from drag/button-up/button-down.
tuple>array 1 head* >tuple ;