comparison lisp/image-dired.el @ 96822:522e28ddd67f

(image-dired-cmd-create-thumbnail-options) (image-dired-cmd-create-temp-image-options) (image-dired-cmd-create-standard-thumbnail-command): Add > to the ImageMagick command line to change the dimensions of the image only if its width or height exceeds the geometry specification.
author Juri Linkov <juri@jurta.org>
date Sat, 19 Jul 2008 23:56:02 +0000
parents b4e36ff621b3
children 814d2d823dd7
comparison
equal deleted inserted replaced
96821:e1156184215a 96822:522e28ddd67f
227 Used together with `image-dired-cmd-create-thumbnail-options'." 227 Used together with `image-dired-cmd-create-thumbnail-options'."
228 :type 'string 228 :type 'string
229 :group 'image-dired) 229 :group 'image-dired)
230 230
231 (defcustom image-dired-cmd-create-thumbnail-options 231 (defcustom image-dired-cmd-create-thumbnail-options
232 "%p -size %wx%h \"%f\" -resize %wx%h -strip jpeg:\"%t\"" 232 "%p -size %wx%h \"%f\" -resize \"%wx%h>\" -strip jpeg:\"%t\""
233 "Format of command used to create thumbnail image. 233 "Format of command used to create thumbnail image.
234 Available options are %p which is replaced by 234 Available options are %p which is replaced by
235 `image-dired-cmd-create-thumbnail-program', %w which is replaced by 235 `image-dired-cmd-create-thumbnail-program', %w which is replaced by
236 `image-dired-thumb-width', %h which is replaced by `image-dired-thumb-height', 236 `image-dired-thumb-width', %h which is replaced by `image-dired-thumb-height',
237 %f which is replaced by the file name of the original image and %t 237 %f which is replaced by the file name of the original image and %t
245 Used together with `image-dired-cmd-create-temp-image-options'." 245 Used together with `image-dired-cmd-create-temp-image-options'."
246 :type 'string 246 :type 'string
247 :group 'image-dired) 247 :group 'image-dired)
248 248
249 (defcustom image-dired-cmd-create-temp-image-options 249 (defcustom image-dired-cmd-create-temp-image-options
250 "%p -size %wx%h \"%f\" -resize %wx%h -strip jpeg:\"%t\"" 250 "%p -size %wx%h \"%f\" -resize \"%wx%h>\" -strip jpeg:\"%t\""
251 "Format of command used to create temporary image for display window. 251 "Format of command used to create temporary image for display window.
252 Available options are %p which is replaced by 252 Available options are %p which is replaced by
253 `image-dired-cmd-create-temp-image-program', %w and %h which is replaced by 253 `image-dired-cmd-create-temp-image-program', %w and %h which is replaced by
254 the calculated max size for width and height in the image display window, 254 the calculated max size for width and height in the image display window,
255 %f which is replaced by the file name of the original image and %t which 255 %f which is replaced by the file name of the original image and %t which
278 (concat 278 (concat
279 "-set \"Thumb::MTime\" \"%m\" " 279 "-set \"Thumb::MTime\" \"%m\" "
280 "-set \"Thumb::URI\" \"file://%f\" " 280 "-set \"Thumb::URI\" \"file://%f\" "
281 "-set \"Description\" \"Thumbnail of file://%f\" " 281 "-set \"Description\" \"Thumbnail of file://%f\" "
282 "-set \"Software\" \"" (emacs-version) "\" ")) 282 "-set \"Software\" \"" (emacs-version) "\" "))
283 "-thumbnail %wx%h png:\"%t\"" 283 "-thumbnail \"%wx%h>\" png:\"%t\""
284 (if image-dired-cmd-pngnq-program 284 (if image-dired-cmd-pngnq-program
285 (concat 285 (concat
286 " ; " image-dired-cmd-pngnq-program " -f \"%t\"" 286 " ; " image-dired-cmd-pngnq-program " -f \"%t\""
287 (unless image-dired-cmd-pngcrush-program 287 (unless image-dired-cmd-pngcrush-program
288 " ; mv %q %t"))) 288 " ; mv %q %t")))