* lisp/dired-aux.el (dired-check-process): Doc fix. (Bug#52337)
This commit is contained in:
parent
0f30227f97
commit
b80d7568e4
1 changed files with 8 additions and 6 deletions
|
@ -992,12 +992,14 @@ prompted for the shell command to use interactively."
|
||||||
|
|
||||||
|
|
||||||
(defun dired-check-process (msg program &rest arguments)
|
(defun dired-check-process (msg program &rest arguments)
|
||||||
"Display MSG while running PROGRAM, and check for output.
|
"Display MSG, then run PROGRAM, and log any error messages from it.
|
||||||
Remaining arguments are strings passed as command arguments to PROGRAM.
|
ARGUMENTS should be strings to be passed to PROGRAM as command-line
|
||||||
On error, insert output
|
arguments.
|
||||||
in a log buffer and return the offending ARGUMENTS or PROGRAM.
|
|
||||||
Caller can cons up a list of failed args.
|
If PROGRAM exits successfully, display \"MSG...done\" and return nil.
|
||||||
Else returns nil for success."
|
If PROGRAM exits abnormally, save in `dired-log-buffer' the command
|
||||||
|
that invoked PROGRAM and the messages it emitted, and return either
|
||||||
|
the offending ARGUMENTS or PROGRAM if no ARGUMENTS were provided."
|
||||||
(let (err-buffer err (dir default-directory))
|
(let (err-buffer err (dir default-directory))
|
||||||
(message "%s..." msg)
|
(message "%s..." msg)
|
||||||
(save-excursion
|
(save-excursion
|
||||||
|
|
Loading…
Add table
Reference in a new issue