diff options
| author | Glenn Morris <rgm@gnu.org> | 2007-10-13 02:50:02 +0000 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2007-10-13 02:50:02 +0000 |
| commit | 3aa491bcaf40a24357a6527b92277e15aa878424 (patch) | |
| tree | 98edf2b1351b8946d5d4dd53bfd09c5e51a857d0 /lisp/url/url-auth.el | |
| parent | 5eee3c954ef8f1f7a1c6390875a22339b8e2b446 (diff) | |
| download | emacs-3aa491bcaf40a24357a6527b92277e15aa878424.tar.gz | |
Diane Murray <disumu at x3y2z1.net>
(url-basic-auth): Set path to "/" when URL has an empty string filename.
Diffstat (limited to 'lisp/url/url-auth.el')
| -rw-r--r-- | lisp/url/url-auth.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/url/url-auth.el b/lisp/url/url-auth.el index e48a4e293bd..60239ba76ac 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 |