gravatar: kill buffer when retrieved

Signed-off-by: Julien Danjou <julien@danjou.info>

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 493f7b1..441c7c7 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2010-10-04  Julien Danjou  <julien@danjou.info>
+
+       * gravatar.el (gravatar-retrieved): Kill buffer when gravatar has been
+       retrieved.
+
 2010-10-04  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
        * shr.el (browse-url): Required.

diff --git a/lisp/gravatar.el b/lisp/gravatar.el
index d4dfb76..50b0ba1 100644 (file)
--- a/lisp/gravatar.el
+++ b/lisp/gravatar.el
@@ -125,7 +125,8 @@ You can provide a list of argument to pass to CB in CBARGS."
   (if (plist-get status :error)
       ;; Error happened.
       (apply cb 'error cbargs)
-    (apply cb (gravatar-data->image) cbargs)))
+    (apply cb (gravatar-data->image) cbargs))
+  (kill-buffer (current-buffer)))
 
 (provide 'gravatar)