diff options
| -rw-r--r-- | lisp/url/url-auth.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/url/url-auth.el b/lisp/url/url-auth.el index 1ef73a62c02..0746cfd96cb 100644 --- a/lisp/url/url-auth.el +++ b/lisp/url/url-auth.el @@ -192,8 +192,7 @@ key cache `url-digest-auth-storage'." (defun url-digest-auth-make-cnonce () "Compute a new unique client nonce value." (base64-encode-string - (apply #'format "%016x%08x%08x" (random) - (read (format-time-string "(%s %N)"))) + (format "%016x%016x" (random) (car (encode-time nil t))) t)) (defun url-digest-auth-nonce-count (_nonce) |