Clicks in the pane don't scroll anymore

release
Slava Pestov 2007-10-11 18:22:24 -04:00
parent f7d8e204e7
commit c5f760da65
1 changed files with 1 additions and 1 deletions
extra/ui/gadgets/panes

View File

@ -353,7 +353,6 @@ M: f sloppy-pick-up*
: move-caret ( pane -- )
dup hand-rel
over sloppy-pick-up
2dup gadget-at-path scroll>gadget
over set-pane-caret
relayout-1 ;
@ -372,6 +371,7 @@ M: f sloppy-pick-up*
dup caret>mark
] when
] if
dup dup pane-caret gadget-at-path scroll>gadget
] when drop ;
: end-selection ( pane -- )