From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 1 Dec 2005 19:14:15 +0000 (+0000)
Subject: (url-retrieve): Test url-history-track.
X-Git-Tag: emacs-pretest-22.0.90~5572
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=11b5750f1289917958c99276c5336fade689aef6;p=emacs.git

(url-retrieve): Test url-history-track.
---

diff --git a/lisp/url/url.el b/lisp/url/url.el
index 4a1e157e59d..81d2d39c281 100644
--- a/lisp/url/url.el
+++ b/lisp/url/url.el
@@ -148,7 +148,8 @@ already completed."
       (if buffer
 	  (with-current-buffer buffer
 	    (apply callback cbargs))))
-    (url-history-update-url url (current-time))
+    (if url-history-track
+	(url-history-update-url url (current-time)))
     buffer))
 
 (defun url-retrieve-synchronously (url)