From 953e7abf5befc560d1c88b6dfbbeb5f52d60e8b6 Mon Sep 17 00:00:00 2001 From: Kyle Hubert Date: Fri, 31 Jan 2020 09:29:43 -0500 Subject: [PATCH] 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 --- lisp/vc/ediff-util.el | 4 ++-- 1 file 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 -- 2.39.5