Commit a50d1244 authored by Nick Roberts's avatar Nick Roberts
Browse files

(thumbs-call-convert): Use call-process directly

with thumbs-conversion-program instead of through shell-file-name
for better error reporting when program is missing.
parent dacc50be
......@@ -248,15 +248,12 @@ ARG any arguments to the ACTION command,
OUTPUT-FORMAT is the file format to output (default is jpeg),
ACTION-PREFIX is the symbol to place before the ACTION command
(defaults to '-' but can sometimes be '+')."
(let ((command (format "%s %s%s %s \"%s\" \"%s:%s\""
(or action-prefix "-")
(or arg "")
(or output-format "jpeg")
(call-process shell-file-name nil nil nil shell-command-switch command)))
(call-process thumbs-conversion-program nil nil nil
(or action-prefix "-")
(or arg "")
(format "%s:%s" (or output-format "jpeg") fileout)))
(defun thumbs-new-image-size (s increment)
"New image (a cons of width x height)."
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment