X-Git-Url: http://cgit.sxemacs.org/?p=gnus;a=blobdiff_plain;f=lisp%2Fgravatar.el;h=fc536495a0be073557b8d8e66b2ab3404b711486;hp=650564e2802e6136fe42c36480d13ceffd3e5dcb;hb=68f412fcdd68a5d0c322fd69a5e4cf07c1209e2b;hpb=b4bc300f0dcddc2b17bb50a3501ed6e6db1ef12c diff --git a/lisp/gravatar.el b/lisp/gravatar.el index 650564e28..fc536495a 100644 --- a/lisp/gravatar.el +++ b/lisp/gravatar.el @@ -1,6 +1,6 @@ ;;; gravatar.el --- Get Gravatars -;; Copyright (C) 2010-2014 Free Software Foundation, Inc. +;; Copyright (C) 2010-2015 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)))