X-Git-Url: http://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Fgravatar.el;h=ffbc37ae15887748346f35d7c2aa433a5434dc4d;hb=1c2ed0ce5abe2181e51f777171f8cd40a547e5a9;hp=fa7e8fa7ce8a058a0dfc11300cccf17344da5b39;hpb=9551aa7c7b1661c69d9a542dfac26c8af444e9d6;p=gnus diff --git a/lisp/gravatar.el b/lisp/gravatar.el index fa7e8fa7c..ffbc37ae1 100644 --- a/lisp/gravatar.el +++ b/lisp/gravatar.el @@ -1,6 +1,6 @@ ;;; gravatar.el --- Get Gravatars -;; Copyright (C) 2010-2013 Free Software Foundation, Inc. +;; Copyright (C) 2010-2014 Free Software Foundation, Inc. ;; Author: Julien Danjou ;; Keywords: news @@ -138,9 +138,7 @@ You can provide a list of argument to pass to CB in CBARGS." "Retrieve MAIL-ADDRESS gravatar and returns it." (let ((url (gravatar-build-url mail-address))) (if (gravatar-cache-expired url) - (with-current-buffer (if (featurep 'xemacs) - (url-retrieve url) - (url-retrieve-synchronously url)) + (with-current-buffer (url-retrieve-synchronously url) (when gravatar-automatic-caching (url-store-in-cache (current-buffer))) (let ((data (gravatar-data->image)))