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

Fix thinko in dired-change-marks

Browse source 
* lisp/dired.el (dired-change-marks): Fix my previous broken attempt
to declare advertised-calling-convention.
This commit is contained in:
Stefan Kangas 2020-09-22 00:35:05 +02:00
parent fb68645b5a
commit 83b0fc4429
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

@ -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)))