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

; Fix doc strings of a few Dired commands

Browse source 
* lisp/dired-aux.el (dired-do-chown, dired-do-touch)
(dired-do-chgrp, dired-do-chmod): Doc fix.  (Bug#77650)
This commit is contained in:
Eli Zaretskii 2025-04-09 14:25:29 +03:00
parent 30fb2ac07a
commit 378bea99b1
1 changed files with 17 additions and 12 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

29
lisp/dired-aux.el
View file

@ -490,9 +490,11 @@ List has a form of (file-name full-file-name (attribute-list))."
(defun dired-do-chmod (&optional arg) (defun dired-do-chmod (&optional arg)
"Change the mode of the marked (or next ARG) files. "Change the mode of the marked (or next ARG) files.
Both octal numeric modes like `644' and symbolic modes like `g+w' Both octal numeric modes like `644' and symbolic modes like `g+w'
are supported. Type \\<minibuffer-local-completion-map>\ are supported.
\\[next-history-element] to pull the file attributes of the file After invoking the command, \
at point into the minibuffer. type \\<minibuffer-local-completion-map>\\[next-history-element] \
to pull the file attributes
of the file at point into the minibuffer.
See Info node `(coreutils)File permissions' for more information. See Info node `(coreutils)File permissions' for more information.
Alternatively, see the man page for \"chmod(1)\". Alternatively, see the man page for \"chmod(1)\".
@ -541,9 +543,10 @@ has no effect on MS-Windows."
;;;###autoload ;;;###autoload
(defun dired-do-chgrp (&optional arg) (defun dired-do-chgrp (&optional arg)
"Change the group of the marked (or next ARG) files. "Change the group of the marked (or next ARG) files.
Type \\<minibuffer-local-completion-map>\\[next-history-element] \ After invoking the command, \
to pull the file attributes of the file at point type \\<minibuffer-local-completion-map>\\[next-history-element] \
into the minibuffer." to pull the file attributes
of the file at point into the minibuffer."
(interactive "P" dired-mode) (interactive "P" dired-mode)
(if (and (memq system-type '(ms-dos windows-nt)) (if (and (memq system-type '(ms-dos windows-nt))
(not (file-remote-p default-directory))) (not (file-remote-p default-directory)))
@ -553,9 +556,10 @@ into the minibuffer."
;;;###autoload ;;;###autoload
(defun dired-do-chown (&optional arg) (defun dired-do-chown (&optional arg)
"Change the owner of the marked (or next ARG) files. "Change the owner of the marked (or next ARG) files.
Type \\<minibuffer-local-completion-map>\\[next-history-element] \ After invoking the command, \
to pull the file attributes of the file at point type \\<minibuffer-local-completion-map>\\[next-history-element] \
into the minibuffer." to pull the file attributes
of the file at point into the minibuffer."
(interactive "P" dired-mode) (interactive "P" dired-mode)
(if (and (memq system-type '(ms-dos windows-nt)) (if (and (memq system-type '(ms-dos windows-nt))
(not (file-remote-p default-directory))) (not (file-remote-p default-directory)))
@ -566,9 +570,10 @@ into the minibuffer."
(defun dired-do-touch (&optional arg) (defun dired-do-touch (&optional arg)
"Change the timestamp of the marked (or next ARG) files. "Change the timestamp of the marked (or next ARG) files.
This calls touch. This calls touch.
Type Type \\<minibuffer-local-completion-map>\\[next-history-element] \ After invoking the command, \
to pull the file attributes of the file at point type \\<minibuffer-local-completion-map>\\[next-history-element] \
into the minibuffer." to pull the file attributes
of the file at point into the minibuffer."
(interactive "P" dired-mode) (interactive "P" dired-mode)
(dired-do-chxxx "Timestamp" dired-touch-program 'touch arg)) (dired-do-chxxx "Timestamp" dired-touch-program 'touch arg))