Commit 953e7abf authored by Kyle Hubert's avatar Kyle Hubert Committed by Eli Zaretskii

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
parent 07e1852c
Pipeline #4765 passed with stage
in 72 minutes and 12 seconds
......@@ -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
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment