diff --git a/basis/ui/gadgets/editors/editors.factor b/basis/ui/gadgets/editors/editors.factor index d50405809f..2ead238a8b 100644 --- a/basis/ui/gadgets/editors/editors.factor +++ b/basis/ui/gadgets/editors/editors.factor @@ -466,7 +466,7 @@ editor "caret-motion" f { editor "selection" f { { T{ button-down f { S+ } 1 } extend-selection } { T{ button-up f { S+ } 1 } com-copy-selection } - { T{ drag } drag-selection } + { T{ drag { # 1 } } drag-selection } { gain-focus focus-editor } { lose-focus unfocus-editor } { delete-action remove-selection } diff --git a/basis/ui/gadgets/panes/panes.factor b/basis/ui/gadgets/panes/panes.factor index 8fec7e45ce..773ad29c93 100644 --- a/basis/ui/gadgets/panes/panes.factor +++ b/basis/ui/gadgets/panes/panes.factor @@ -420,7 +420,7 @@ pane H{ { T{ button-down f { S+ } 1 } [ select-to-caret ] } { T{ button-up f { S+ } 1 } [ end-selection ] } { T{ button-up } [ end-selection ] } - { T{ drag } [ extend-selection ] } + { T{ drag { # 1 } } [ extend-selection ] } { copy-action [ com-copy ] } { T{ button-down f f 3 } [ pane-menu ] } } set-gestures