emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] master 851be0f: Add "^" to the interactive specs of `dired


From: Juanma Barranquero
Subject: [Emacs-diffs] master 851be0f: Add "^" to the interactive specs of `dired-next/previous-line'
Date: Thu, 12 Nov 2015 08:38:18 +0000

branch: master
commit 851be0f60718795c985f504db4823344508b107d
Author: Eli Barzilay <address@hidden>
Commit: Juanma Barranquero <address@hidden>

    Add "^" to the interactive specs of `dired-next/previous-line'
    
    * 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.
---
 lisp/dired.el |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/dired.el b/lisp/dired.el
index 5f0a83a..049d45d 100644
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -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)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]