[Emacs-diffs] Changes to emacs/lisp/thumbs.el,v

[Nick Roberts]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Nick Roberts <nickrob>  07/12/28 08:09:57

Index: thumbs.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/thumbs.el,v
retrieving revision 1.35
retrieving revision 1.36
diff -u -b -r1.35 -r1.36
--- thumbs.el   26 Jul 2007 05:26:35 -0000      1.35
+++ thumbs.el   28 Dec 2007 08:09:57 -0000      1.36
@@ -248,15 +248,12 @@
 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\""
-                        thumbs-conversion-program
+  (call-process thumbs-conversion-program nil nil nil
                         (or action-prefix "-")
                         action
                         (or arg "")
                         filein
-                        (or output-format "jpeg")
-                        fileout)))
-    (call-process shell-file-name nil nil nil shell-command-switch command)))
+               (format "%s:%s" (or output-format "jpeg") fileout)))
 
 (defun thumbs-new-image-size (s increment)
   "New image (a cons of width x height)."