emacs-diffs
[Top][All Lists]
Advanced

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

master 83b0fc4: Fix thinko in dired-change-marks


From: Stefan Kangas
Subject: master 83b0fc4: Fix thinko in dired-change-marks
Date: Mon, 21 Sep 2020 18:38:07 -0400 (EDT)

branch: master
commit 83b0fc4429e4743a14dc914a09217923d35591bf
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>

    Fix thinko in dired-change-marks
    
    * lisp/dired.el (dired-change-marks): Fix my previous broken attempt
    to declare advertised-calling-convention.
---
 lisp/dired.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/dired.el b/lisp/dired.el
index 7839ace..1ed949d 100644
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -4062,10 +4062,10 @@ only in the active region if `dired-mark-region' is 
non-nil."
            (if fn (backup-file-name-p fn))))
      "backup file")))
 
-(defun dired-change-marks (old new)
+(defun dired-change-marks (&optional old new)
   "Change all OLD marks to NEW marks.
 OLD and NEW are both characters used to mark files."
-  (declare (advertised-calling-convention '(old new) "28.1"))
+  (declare (advertised-calling-convention (old new) "28.1"))
   (interactive
    (let* ((cursor-in-echo-area t)
          (old (progn (message "Change (old mark): ") (read-char)))



reply via email to

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