diff options
| author | Kyle Hubert <khubert@gmail.com> | 2020-01-31 09:29:43 -0500 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2020-02-08 12:00:55 +0200 |
| commit | 953e7abf5befc560d1c88b6dfbbeb5f52d60e8b6 (patch) | |
| tree | 4a46b53da26e9b997fc071472727b258b590aa43 | |
| parent | 07e1852c9b58ffa86443f61705e3dae4af0736f7 (diff) | |
| download | emacs-953e7abf5befc560d1c88b6dfbbeb5f52d60e8b6.tar.gz | |
Improve prefix arg support in 'ediff-scroll-horizontally'
* lisp/vc/ediff-util.el (ediff-scroll-horizontally): Use
'current-prefix-arg' to pass the value of prefix argument to
scrolling commands. (Bug#39353)
Copyright-paperwork-exempt: yes
| -rw-r--r-- | lisp/vc/ediff-util.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/vc/ediff-util.el b/lisp/vc/ediff-util.el index a8af9ba37a2..5f8a4a86b15 100644 --- a/lisp/vc/ediff-util.el +++ b/lisp/vc/ediff-util.el @@ -1540,10 +1540,10 @@ the width of the A/B/C windows." ;; hscrolling. (if (= last-command-event ?<) (lambda (arg) - (let ((prefix-arg arg)) + (let ((current-prefix-arg arg)) (call-interactively #'scroll-left))) (lambda (arg) - (let ((prefix-arg arg)) + (let ((current-prefix-arg arg)) (call-interactively #'scroll-right)))) ;; calculate argument to scroll-left/right ;; if there is an explicit argument |