diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/scroll-bar.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/scroll-bar.el b/lisp/scroll-bar.el index 1ee1b462db4..609bea4ab9c 100644 --- a/lisp/scroll-bar.el +++ b/lisp/scroll-bar.el @@ -218,7 +218,7 @@ EVENT should be a scroll bar click or drag event." (goto-char (+ (point-min) (scroll-bar-scale portion-whole (- (point-max) (point-min))))) - (beginning-of-line) + (vertical-motion 0 window) (set-window-start window (point))))) (defun scroll-bar-drag (event) |