diff lisp/url/url-http.el @ 109553:a4b9fa0b861b

Merge from emacs-23
author Juanma Barranquero <lekktu@gmail.com>
date Tue, 27 Jul 2010 04:10:05 +0200
parents c9fdfb1ca05e f573d4ab76a4
children 88f8a448614e
line wrap: on
line diff
--- a/lisp/url/url-http.el	Mon Jul 26 15:05:47 2010 -0400
+++ b/lisp/url/url-http.el	Tue Jul 27 04:10:05 2010 +0200
@@ -486,7 +486,11 @@
 	(class nil)
 	(success nil)
 	;; other status symbols: jewelry and luxury cars
-	(status-symbol (cadr (assq url-http-response-status url-http-codes))))
+	(status-symbol (cadr (assq url-http-response-status url-http-codes)))
+	;; The filename part of a URL could be in remote file syntax,
+	;; see Bug#6717 for an example.  We disable file name
+	;; handlers, therefore.
+	(file-name-handler-alist nil))
     (setq class (/ url-http-response-status 100))
     (url-http-debug "Parsed HTTP headers: class=%d status=%d" class url-http-response-status)
     (url-http-handle-cookies)