From 827b8fd3555535aa468ed65cc474ea61d33598c3 Mon Sep 17 00:00:00 2001 From: Julien Danjou Date: Sat, 2 Oct 2010 17:00:03 +0200 Subject: [PATCH] gnus-gravatar-insert: Adjust character where we should go backward Signed-off-by: Julien Danjou --- lisp/ChangeLog | 5 +++++ lisp/gnus-gravatar.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index e1e08e133..1d1c39fbf 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2010-10-02 Julien Danjou + + * gnus-gravatar.el (gnus-gravatar-insert): Adjust character where we + should go backward. + 2010-10-02 Lars Magne Ingebrigtsen * shr.el: New file. diff --git a/lisp/gnus-gravatar.el b/lisp/gnus-gravatar.el index 2af975b09..de373cfdf 100644 --- a/lisp/gnus-gravatar.el +++ b/lisp/gnus-gravatar.el @@ -76,7 +76,7 @@ Set image category to CATEGORY." (search-backward mail-address nil t))) (goto-char (1- (point))) ;; If we're on the " quoting the name, go backward - (when (looking-at "\"") + (when (looking-at "[\"<]") (goto-char (1- (point)))) ;; Do not do anything if there's already a gravatar. This can ;; happens if the buffer has been regenerated in the mean time, for -- 2.25.1