procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Add "^" to the interactive specs of `dired-next/previous-line'

Browse source 
* lisp/dired.el (dired-next-line, dired-previous-line): It makes sense
to bind these commands to the arrow keys, and that means that they work
better with a "^" in the `interactive' declaration so selection works
as expected.
This commit is contained in:
Eli Barzilay 2015-11-12 03:07:38 -05:00 • committed by Juanma Barranquero
parent 055ca3a57e
commit 851be0f607
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/dired.el
View file

@ -2031,7 +2031,7 @@ Otherwise, toggle `read-only-mode'."
(defun dired-next-line (arg)
"Move down lines then position at filename.
Optional prefix ARG says how many lines to move; default is one line."
(interactive "p")
(interactive "^p")
(let ((line-move-visual)
(goal-column))
(line-move arg t))
@ -2044,7 +2044,7 @@ Optional prefix ARG says how many lines to move; default is one line."
(defun dired-previous-line (arg)
"Move up lines then position at filename.
Optional prefix ARG says how many lines to move; default is one line."
(interactive "p")
(interactive "^p")
(dired-next-line (- (or arg 1))))
(defun dired-next-dirline (arg &optional opoint)