diff options
| -rw-r--r-- | lisp/url/url-auth.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/url/url-auth.el b/lisp/url/url-auth.el index ce730ce74ea..adf1d5b6703 100644 --- a/lisp/url/url-auth.el +++ b/lisp/url/url-auth.el | |||
| @@ -93,7 +93,8 @@ instead of the filename inheritance method." | |||
| 93 | (cons file | 93 | (cons file |
| 94 | (setq retval | 94 | (setq retval |
| 95 | (base64-encode-string | 95 | (base64-encode-string |
| 96 | (format "%s:%s" user pass))))) | 96 | (format "%s:%s" user |
| 97 | (encode-coding-string pass 'utf-8)))))) | ||
| 97 | (symbol-value url-basic-auth-storage)))) | 98 | (symbol-value url-basic-auth-storage)))) |
| 98 | (byserv | 99 | (byserv |
| 99 | (setq retval (cdr-safe (assoc file byserv))) | 100 | (setq retval (cdr-safe (assoc file byserv))) |