]> git.eshelyaron.com Git - emacs.git/commitdiff
Avoid signaling errors in url-basic-auth when password is nil
authorEli Zaretskii <eliz@gnu.org>
Thu, 2 Mar 2023 12:35:15 +0000 (14:35 +0200)
committerEli Zaretskii <eliz@gnu.org>
Thu, 2 Mar 2023 12:35:15 +0000 (14:35 +0200)
* lisp/url/url-auth.el (url-basic-auth): Handle nil PASS.
Suggested by Ellis Kenyo <me@elken.dev>.  (Bug#61411)

lisp/url/url-auth.el

index e9ee72029f324d1ac22d6c885cfa29a13b43073a..6848c0c73a7a777a210e2b0cffc9836c82022f2e 100644 (file)
@@ -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