(url-http-parse-headers): Test url-automatic-caching.

76bad534 · Richard M. Stallman · 470cefd3 · 76bad534
Commit 76bad534 authored Feb 14, 2005 by Richard M. Stallman
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

lisp/url/url-http.el lisp/url/url-http.el +1 -1

No files found.
--- a/lisp/url/url-http.el
+++ b/lisp/url/url-http.el
@@ -413,7 +413,7 @@ should be shown to the user."
 	  ;; Generic success for all others.  Store in the cache, and
 	  ;; mark it as successful.
 	  (widen)
-	  (if (equal url-http-method "GET")
+	  (if (and url-automatic-caching (equal url-http-method "GET"))
 	      (url-store-in-cache (current-buffer)))
 	  (setq success t))))
      (3				; Redirection