X-Git-Url: http://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Fgnus-gravatar.el;h=b6e760b1d0be749b7a38df11791346643baf010e;hb=873ba7b51ddfb07246cd874b7de72662308236c9;hp=7208889a163a6d0ad758bf9b5f8c847c5183dc30;hpb=4c2a7a1c25d5b10316f35f28c972ef3e70225f25;p=gnus

diff --git a/lisp/gnus-gravatar.el b/lisp/gnus-gravatar.el
index 7208889a1..b6e760b1d 100644
--- a/lisp/gnus-gravatar.el
+++ b/lisp/gnus-gravatar.el
@@ -1,6 +1,6 @@
 ;;; gnus-gravatar.el --- Gnus Gravatar support
 
-;; Copyright (C) 2010-2011 Free Software Foundation, Inc.
+;; Copyright (C) 2010-2012 Free Software Foundation, Inc.
 
 ;; Author: Julien Danjou <julien@danjou.info>
 ;; Keywords: news
@@ -80,9 +80,8 @@ If nil, default to `gravatar-size'."
   "Insert GRAVATAR for ADDRESS in HEADER in current article buffer.
 Set image category to CATEGORY."
   (unless (eq gravatar 'error)
-    (with-current-buffer gnus-article-buffer
+    (gnus-with-article-buffer
       (let ((mark (point-marker))
-	    (inhibit-read-only t)
 	    (inhibit-point-motion-hooks t)
 	    (case-fold-search t))
 	(save-restriction