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)
This commit is contained in:
Eli Zaretskii 2023-03-02 14:35:15 +02:00
parent 756225e377
commit 1c7b2673bd

View file

@ -100,7 +100,10 @@ instead of the filename inheritance method."
(setq retval (setq retval
(base64-encode-string (base64-encode-string
(format "%s:%s" user (format "%s:%s" user
(encode-coding-string pass 'utf-8)) (if pass
(encode-coding-string pass
'utf-8)
""))
t)))) t))))
(symbol-value url-basic-auth-storage)))) (symbol-value url-basic-auth-storage))))
(byserv (byserv