steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fix shift-drag again

db4
Slava Pestov 2008-11-22 02:24:17 -06:00
parent fa56d2849b
commit 7e71fe081c
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
basis/ui/gadgets/panes/panes.factor
View File

@ -10,7 +10,6 @@ io.streams.nested assocs ui.gadgets.presentations
ui.gadgets.slots ui.gadgets.grids ui.gadgets.grid-lines
classes.tuple models continuations destructors accessors
math.geometry.rect ;
IN: ui.gadgets.panes
TUPLE: pane < pack
@ -402,7 +401,7 @@ M: f sloppy-pick-up*
pane H{
{ T{ button-down } [ begin-selection ] }
{ T{ button-down f { S+ } 1 } [ select-to-caret ] }
{ T{ button-up f { S+ } 1 } [ drop ] }
{ T{ button-up f { S+ } 1 } [ end-selection ] }
{ T{ button-up } [ end-selection ] }
{ T{ drag } [ extend-selection ] }
{ T{ copy-action } [ com-copy ] }