From: Lars Magne Ingebrigtsen <larsi@gnus.org>
Date: Wed, 24 Aug 2016 21:56:12 +0000 (+0200)
Subject: Find message.el thumbnail toggling
X-Git-Tag: emacs-26.0.90~1698
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=70cfe9df957bd2f0699f62fe5e69176313f7c8f0;p=emacs.git

Find message.el thumbnail toggling

* lisp/gnus/message.el (message-toggle-image-thumbnails):
Don't infloop when toggling thumbnails.
---

diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index 2ce97377362..cb4843e1462 100644
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -8399,7 +8399,8 @@ Used in `message-simplify-recipients'."
 	  (when (and (consp props)
 		     (eq (car props) 'image))
 	    (put-text-property (point) (1+ (point)) 'display nil)
-	    (setq displayed t)))))
+	    (setq displayed t)))
+	(forward-char 1)))
     (unless displayed
       (save-excursion
 	(goto-char (point-min))