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:
parent
2a0a090a92
commit
730426aeb1
@ -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
|
||||
|
Loading…
Reference in New Issue
Block a user