1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-03 11:33:37 +00:00

(dired-compress-file): Test the return value

of dired-check-process properly.
Fix use of nonexistent var `name'.
This commit is contained in:
Richard M. Stallman 1993-05-25 19:05:13 +00:00
parent 2a0a090a92
commit 730426aeb1

View File

@ -493,7 +493,7 @@ and use this command with a prefix argument (the value does not matter)."
(t
(if (not (dired-check-process (concat "Compressing " file)
"compress" "-f" file))
(concat name ".Z"))))))
(concat file ".Z"))))))
(defun dired-mark-confirm (op-symbol arg)
;; Request confirmation from the user that the operation described