From cbbbf7b15afb4884dbc75a535bd0572c1a38c521 Mon Sep 17 00:00:00 2001
From: Glenn Morris <rgm@gnu.org>
Date: Sat, 13 Oct 2007 02:49:32 +0000
Subject: Diane Murray  <disumu at x3y2z1.net>

(url-basic-auth): Set path to "/" when URL has an empty string filename.
---
 lisp/url/url-auth.el | 1 +
 1 file changed, 1 insertion(+)

(limited to 'lisp/url/url-auth.el')

diff --git a/lisp/url/url-auth.el b/lisp/url/url-auth.el
index 3c33fd914e5..b2de802cbad 100644
--- a/lisp/url/url-auth.el
+++ b/lisp/url/url-auth.el
@@ -74,6 +74,7 @@ instead of the pathname inheritance method."
     (setq server (format "%s:%d" server port)
 	  path (cond
 		(realm realm)
+		((string= "" path) "/")
 		((string-match "/$" path) path)
 		(t (url-basepath path)))
 	  byserv (cdr-safe (assoc server
-- 
cgit v1.2.3