Mercurial > emacs
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"))) |