* lisp/url/url-future.el (url-future-call): Remove useless value call.

An earlier version of this function returned the value, ref
http://lists.gnu.org/archive/html/emacs-devel/2011-05/msg00708.html
but now it returns the function (see commentary).

diff --git a/lisp/url/ChangeLog b/lisp/url/ChangeLog
index 49adec69de7e0e3ca0569ad19c2557a7d0b7b9d0..0d963eddc02ba2b1de85d43a71dc1bb22ab0e549 100644 (file)
--- a/lisp/url/ChangeLog
+++ b/lisp/url/ChangeLog
@@ -1,3 +1,7 @@
+2013-06-21  Glenn Morris  <rgm@gnu.org>
+
+       * url-future.el (url-future-call): Remove useless value call.
+
 2013-05-23  Glenn Morris  <rgm@gnu.org>
 
        * url.el (mm-dissect-buffer, mm-display-part): Declare.

diff --git a/lisp/url/url-future.el b/lisp/url/url-future.el
index 35a78cf0c050c6b98197e324f9695d7b25bb1b06..cb3276d074544f25dcd723a95bc8081f62a53b5b 100644 (file)
--- a/lisp/url/url-future.el
+++ b/lisp/url/url-future.el
@@ -84,7 +84,9 @@
             (setf (url-future-value url-future)
                   (funcall ff))
           (error (url-future-errored url-future catcher)))
-        (url-future-value url-future)))
+        ;; Unused return value.
+;;;        (url-future-value url-future)
+        ))
     (if (url-future-errored-p url-future)
         url-future
       (url-future-finish url-future))))