# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1192243588 0
# Node ID 7d0c6a0340a232c6bd804684ecc6df36776916f7
# Parent  782f0bc49c07964de640014a686e2ec94b9afabc
Diane Murray  <disumu at x3y2z1.net>

(url-basic-auth): Set path to "/" when URL has an empty string filename.

diff -r 782f0bc49c07 -r 7d0c6a0340a2 lisp/url/url-auth.el
--- a/lisp/url/url-auth.el	Sat Oct 13 00:07:23 2007 +0000
+++ b/lisp/url/url-auth.el	Sat Oct 13 02:46:28 2007 +0000
@@ -74,6 +74,7 @@
     (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