diff options
| author | Joakim Verona <joakim@verona.se> | 2015-01-21 23:17:19 +0100 |
|---|---|---|
| committer | Joakim Verona <joakim@verona.se> | 2015-01-21 23:17:19 +0100 |
| commit | 487d6cdc4dfc6500885dfa57a7c2fac8a1760fec (patch) | |
| tree | 66cd8c870bd25f161181501aae7c995f5daa41d0 /lisp/xwidget.el | |
| parent | 069f101ecf15ee9c589d1e172743412eac38318f (diff) | |
| download | emacs-487d6cdc4dfc6500885dfa57a7c2fac8a1760fec.tar.gz emacs-487d6cdc4dfc6500885dfa57a7c2fac8a1760fec.tar.bz2 emacs-487d6cdc4dfc6500885dfa57a7c2fac8a1760fec.zip | |
webkit scrolling bugfix
Diffstat (limited to 'lisp/xwidget.el')
| -rw-r--r-- | lisp/xwidget.el | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/lisp/xwidget.el b/lisp/xwidget.el index 5fdb7405270..a407a2f61bb 100644 --- a/lisp/xwidget.el +++ b/lisp/xwidget.el @@ -153,27 +153,27 @@ defaults to the string looking like a url around the cursor position." "Scroll webkit up,either native or like image mode." (interactive) (if (eq xwidget-webkit-scroll-behaviour 'native) - (xwidget-set-adjustment (xwidget-webkit-last-session) 'vertical t 50) ) - (image-scroll-up)) + (xwidget-set-adjustment (xwidget-webkit-last-session) 'vertical t 50) + (image-scroll-up))) (defun xwidget-webkit-scroll-down () "Scroll webkit down,either native or like image mode." (interactive) (if (eq xwidget-webkit-scroll-behaviour 'native) - (xwidget-set-adjustment (xwidget-webkit-last-session) 'vertical t -50) ) - (image-scroll-down)) + (xwidget-set-adjustment (xwidget-webkit-last-session) 'vertical t -50) + (image-scroll-down))) (defun xwidget-webkit-scroll-forward () (interactive) (if (eq xwidget-webkit-scroll-behaviour 'native) - (xwidget-set-adjustment (xwidget-webkit-last-session) 'horizontal t 50) ) - (xwidget-webkit-scroll-forward)) + (xwidget-set-adjustment (xwidget-webkit-last-session) 'horizontal t 50) + (xwidget-webkit-scroll-forward))) (defun xwidget-webkit-scroll-backward () (interactive) (if (eq xwidget-webkit-scroll-behaviour 'native) - (xwidget-set-adjustment (xwidget-webkit-last-session) 'horizontal t -50) ) - (xwidget-webkit-scroll-backward)) + (xwidget-set-adjustment (xwidget-webkit-last-session) 'horizontal t -50) + (xwidget-webkit-scroll-backward))) ;;the xwidget event needs to go into a higher level handler |