diff options
Diffstat (limited to 'lisp/gnus')
| -rw-r--r-- | lisp/gnus/message.el | 2 | ||||
| -rw-r--r-- | lisp/gnus/nnimap.el | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el index 996b0ac5afc..214cf61e84d 100644 --- a/lisp/gnus/message.el +++ b/lisp/gnus/message.el @@ -8410,7 +8410,7 @@ Used in `message-simplify-recipients'." (save-excursion (goto-char (point-min)) (while (not (eobp)) - (when-let ((props (get-text-property (point) 'display))) + (when-let* ((props (get-text-property (point) 'display))) (when (and (consp props) (eq (car props) 'image)) (put-text-property (point) (1+ (point)) 'display nil) diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el index 2943c8dc7d2..6424d9d780b 100644 --- a/lisp/gnus/nnimap.el +++ b/lisp/gnus/nnimap.el @@ -950,7 +950,7 @@ textual parts.") internal-move-group server message-id nnimap-request-articles-find-limit))))) ;; Move the article to a different method. - (when-let ((result (eval accept-form))) + (when-let* ((result (eval accept-form))) (nnimap-change-group group server) (nnimap-delete-article article) result)))))) |