diff options
| author | Eli Zaretskii <eliz@gnu.org> | 2023-03-02 14:35:15 +0200 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2023-03-02 14:35:15 +0200 |
| commit | 1c7b2673bddc711abd032df5fbff38fc48aba16d (patch) | |
| tree | be6314c70aa9f59e7e0aca0d357233e352440a68 /lisp | |
| parent | 756225e37783a7b8fe73be1280c82f521e72d60f (diff) | |
| download | emacs-1c7b2673bddc711abd032df5fbff38fc48aba16d.tar.gz emacs-1c7b2673bddc711abd032df5fbff38fc48aba16d.tar.bz2 emacs-1c7b2673bddc711abd032df5fbff38fc48aba16d.zip | |
Avoid signaling errors in url-basic-auth when password is nil
* lisp/url/url-auth.el (url-basic-auth): Handle nil PASS.
Suggested by Ellis Kenyo <me@elken.dev>. (Bug#61411)
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/url/url-auth.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/url/url-auth.el b/lisp/url/url-auth.el index e9ee72029f3..6848c0c73a7 100644 --- a/lisp/url/url-auth.el +++ b/lisp/url/url-auth.el @@ -100,7 +100,10 @@ instead of the filename inheritance method." (setq retval (base64-encode-string (format "%s:%s" user - (encode-coding-string pass 'utf-8)) + (if pass + (encode-coding-string pass + 'utf-8) + "")) t)))) (symbol-value url-basic-auth-storage)))) (byserv |