diff options
| -rw-r--r-- | lisp/gnus/gnus-cloud.el | 2 | ||||
| -rw-r--r-- | lisp/gnus/gnus-group.el | 2 | ||||
| -rw-r--r-- | lisp/gnus/gnus-sum.el | 2 | ||||
| -rw-r--r-- | lisp/gnus/message.el | 2 | ||||
| -rw-r--r-- | lisp/gnus/mml.el | 3 |
5 files changed, 11 insertions, 0 deletions
diff --git a/lisp/gnus/gnus-cloud.el b/lisp/gnus/gnus-cloud.el index 2693c01dcba..ac5ff7d47cf 100644 --- a/lisp/gnus/gnus-cloud.el +++ b/lisp/gnus/gnus-cloud.el | |||
| @@ -362,6 +362,8 @@ Use old data if FORCE-OLDER is not nil." | |||
| 362 | (interactive) | 362 | (interactive) |
| 363 | (gnus-cloud-upload-data t)) | 363 | (gnus-cloud-upload-data t)) |
| 364 | 364 | ||
| 365 | (autoload 'gnus-group-refresh-group "gnus-group") | ||
| 366 | |||
| 365 | (defun gnus-cloud-upload-data (&optional full) | 367 | (defun gnus-cloud-upload-data (&optional full) |
| 366 | "Upload data (newsrc and files) to the Gnus Cloud. | 368 | "Upload data (newsrc and files) to the Gnus Cloud. |
| 367 | When FULL is t, upload everything, not just a difference from the last full." | 369 | When FULL is t, upload everything, not just a difference from the last full." |
diff --git a/lisp/gnus/gnus-group.el b/lisp/gnus/gnus-group.el index 48dbc82889e..3e655cc56cd 100644 --- a/lisp/gnus/gnus-group.el +++ b/lisp/gnus/gnus-group.el | |||
| @@ -1086,6 +1086,8 @@ See `gmm-tool-bar-from-list' for the format of the list." | |||
| 1086 | 1086 | ||
| 1087 | (defvar image-load-path) | 1087 | (defvar image-load-path) |
| 1088 | (defvar tool-bar-map) | 1088 | (defvar tool-bar-map) |
| 1089 | (declare-function image-load-path-for-library "image" | ||
| 1090 | (library image &optional path no-error)) | ||
| 1089 | 1091 | ||
| 1090 | (defun gnus-group-make-tool-bar (&optional force) | 1092 | (defun gnus-group-make-tool-bar (&optional force) |
| 1091 | "Make a group mode tool bar from `gnus-group-tool-bar'. | 1093 | "Make a group mode tool bar from `gnus-group-tool-bar'. |
diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el index b6e9ea91b62..a28c00be946 100644 --- a/lisp/gnus/gnus-sum.el +++ b/lisp/gnus/gnus-sum.el | |||
| @@ -2944,6 +2944,8 @@ See `gmm-tool-bar-from-list' for the format of the list." | |||
| 2944 | 2944 | ||
| 2945 | (defvar image-load-path) | 2945 | (defvar image-load-path) |
| 2946 | (defvar tool-bar-map) | 2946 | (defvar tool-bar-map) |
| 2947 | (declare-function image-load-path-for-library "image" | ||
| 2948 | (library image &optional path no-error)) | ||
| 2947 | 2949 | ||
| 2948 | (defun gnus-summary-make-tool-bar (&optional force) | 2950 | (defun gnus-summary-make-tool-bar (&optional force) |
| 2949 | "Make a summary mode tool bar from `gnus-summary-tool-bar'. | 2951 | "Make a summary mode tool bar from `gnus-summary-tool-bar'. |
diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el index 4f4ec3b4081..e452c80e262 100644 --- a/lisp/gnus/message.el +++ b/lisp/gnus/message.el | |||
| @@ -7854,6 +7854,8 @@ See `gmm-tool-bar-from-list' for the format of the list." | |||
| 7854 | :group 'message) | 7854 | :group 'message) |
| 7855 | 7855 | ||
| 7856 | (defvar image-load-path) | 7856 | (defvar image-load-path) |
| 7857 | (declare-function image-load-path-for-library "image" | ||
| 7858 | (library image &optional path no-error)) | ||
| 7857 | 7859 | ||
| 7858 | (defun message-make-tool-bar (&optional force) | 7860 | (defun message-make-tool-bar (&optional force) |
| 7859 | "Make a message mode tool bar from `message-tool-bar-list'. | 7861 | "Make a message mode tool bar from `message-tool-bar-list'. |
diff --git a/lisp/gnus/mml.el b/lisp/gnus/mml.el index 3c9476333fa..38be0dc4e4c 100644 --- a/lisp/gnus/mml.el +++ b/lisp/gnus/mml.el | |||
| @@ -548,6 +548,9 @@ be \"related\" or \"alternate\"." | |||
| 548 | ">"))))))) | 548 | ">"))))))) |
| 549 | cont)))) | 549 | cont)))) |
| 550 | 550 | ||
| 551 | (autoload 'image-property "image") | ||
| 552 | |||
| 553 | ;; FIXME presumably (built-in) ImageMagick could replace exiftool? | ||
| 551 | (defun mml--possibly-alter-image (file-name image) | 554 | (defun mml--possibly-alter-image (file-name image) |
| 552 | (if (or (null image) | 555 | (if (or (null image) |
| 553 | (not (consp image)) | 556 | (not (consp image)) |