Make dired-do-compress-to require format-spec

* lisp/dired-aux.el (dired-do-compress-to): Require format-spec
runtime (bug#38189).
This commit is contained in:
Lars Ingebrigtsen 2019-11-14 06:31:50 +01:00
parent d9ea77af4c
commit 3591cb8dcc

View file

@ -1061,6 +1061,7 @@ Prompt for the archive file name.
Choose the archiving command based on the archive file-name extension
and `dired-compress-files-alist'."
(interactive)
(require 'format-spec)
(let* ((in-files (dired-get-marked-files nil nil nil nil t))
(out-file (expand-file-name (read-file-name "Compress to: ")))
(rule (cl-find-if