diff options
| author | Thomas Fitzsimmons | 2019-05-15 06:14:21 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2019-05-15 06:14:21 +0200 |
| commit | 4fa6029f7ee30aa3316d6d73db61462730042908 (patch) | |
| tree | ce30e4d1fedbd1801018a986fdd03534307065d4 | |
| parent | e3fbe04cbcfecbf3c8b6c8686a2612dbd4b6386a (diff) | |
| download | emacs-4fa6029f7ee30aa3316d6d73db61462730042908.tar.gz emacs-4fa6029f7ee30aa3316d6d73db61462730042908.zip | |
Fix url-auth prompts when realm is empty
* lisp/url/url-auth.el (url-get-authentication): When realm is
empty, use the entire URL in the prompt (bug#35688).
| -rw-r--r-- | lisp/url/url-auth.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/url/url-auth.el b/lisp/url/url-auth.el index 0746cfd96cb..f644787cc64 100644 --- a/lisp/url/url-auth.el +++ b/lisp/url/url-auth.el | |||
| @@ -478,6 +478,8 @@ PROMPT is boolean - specifies whether to ask the user for a username/password | |||
| 478 | if one cannot be found in the cache" | 478 | if one cannot be found in the cache" |
| 479 | (if (not realm) | 479 | (if (not realm) |
| 480 | (setq realm (cdr-safe (assoc "realm" args)))) | 480 | (setq realm (cdr-safe (assoc "realm" args)))) |
| 481 | (if (equal realm "") | ||
| 482 | (setq realm nil)) | ||
| 481 | (if (stringp url) | 483 | (if (stringp url) |
| 482 | (setq url (url-generic-parse-url url))) | 484 | (setq url (url-generic-parse-url url))) |
| 483 | (if (or (null type) (eq type 'any)) | 485 | (if (or (null type) (eq type 'any)) |