diff options
Diffstat (limited to 'lisp/image')
| -rw-r--r-- | lisp/image/image-converter.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/image/image-converter.el b/lisp/image/image-converter.el index ae3d9598920..b694052f5b9 100644 --- a/lisp/image/image-converter.el +++ b/lisp/image/image-converter.el | |||
| @@ -57,6 +57,10 @@ is a string, it should be a MIME format string like | |||
| 57 | ;; Find an installed image converter. | 57 | ;; Find an installed image converter. |
| 58 | (unless image-converter | 58 | (unless image-converter |
| 59 | (image-converter--find-converter)) | 59 | (image-converter--find-converter)) |
| 60 | ;; When image-converter was customized | ||
| 61 | (if (and image-converter (not image-converter-regexp)) | ||
| 62 | (when-let ((formats (image-converter--probe image-converter))) | ||
| 63 | (setq image-converter-regexp (concat "\\." (regexp-opt formats) "\\'")))) | ||
| 60 | (and image-converter | 64 | (and image-converter |
| 61 | (or (and (not data-p) | 65 | (or (and (not data-p) |
| 62 | (string-match image-converter-regexp source)) | 66 | (string-match image-converter-regexp source)) |