[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)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 83b0fc4: Fix thinko in dired-change-marks,
Stefan Kangas <=