diff options
| author | Glenn Morris | 2013-06-20 23:32:50 -0700 |
|---|---|---|
| committer | Glenn Morris | 2013-06-20 23:32:50 -0700 |
| commit | 6bfd7cd07ad3ebd242d230603b8e7cba6f7de95c (patch) | |
| tree | ee853ab4bedf9f75a76ec0a11326ce579d0a27cb | |
| parent | fd846ab406e00ac85b6ed01a6715e795a549c02f (diff) | |
| download | emacs-6bfd7cd07ad3ebd242d230603b8e7cba6f7de95c.tar.gz emacs-6bfd7cd07ad3ebd242d230603b8e7cba6f7de95c.zip | |
* 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).
| -rw-r--r-- | lisp/url/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/url/url-future.el | 4 |
2 files changed, 7 insertions, 1 deletions
diff --git a/lisp/url/ChangeLog b/lisp/url/ChangeLog index 49adec69de7..0d963eddc02 100644 --- a/lisp/url/ChangeLog +++ b/lisp/url/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2013-06-21 Glenn Morris <rgm@gnu.org> | ||
| 2 | |||
| 3 | * url-future.el (url-future-call): Remove useless value call. | ||
| 4 | |||
| 1 | 2013-05-23 Glenn Morris <rgm@gnu.org> | 5 | 2013-05-23 Glenn Morris <rgm@gnu.org> |
| 2 | 6 | ||
| 3 | * url.el (mm-dissect-buffer, mm-display-part): Declare. | 7 | * url.el (mm-dissect-buffer, mm-display-part): Declare. |
diff --git a/lisp/url/url-future.el b/lisp/url/url-future.el index 35a78cf0c05..cb3276d0745 100644 --- a/lisp/url/url-future.el +++ b/lisp/url/url-future.el | |||
| @@ -84,7 +84,9 @@ | |||
| 84 | (setf (url-future-value url-future) | 84 | (setf (url-future-value url-future) |
| 85 | (funcall ff)) | 85 | (funcall ff)) |
| 86 | (error (url-future-errored url-future catcher))) | 86 | (error (url-future-errored url-future catcher))) |
| 87 | (url-future-value url-future))) | 87 | ;; Unused return value. |
| 88 | ;;; (url-future-value url-future) | ||
| 89 | )) | ||
| 88 | (if (url-future-errored-p url-future) | 90 | (if (url-future-errored-p url-future) |
| 89 | url-future | 91 | url-future |
| 90 | (url-future-finish url-future)))) | 92 | (url-future-finish url-future)))) |