projects
/
gnus
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
(eww-convert-widgets): Fix last patch.
[gnus]
/
lisp
/
sasl.el
diff --git
a/lisp/sasl.el
b/lisp/sasl.el
index
366958a
..
a5efdd6
100644
(file)
--- a/
lisp/sasl.el
+++ b/
lisp/sasl.el
@@
-1,6
+1,6
@@
;;; sasl.el --- SASL client framework
;;; sasl.el --- SASL client framework
-;; Copyright (C) 2000, 2007
, 2008, 2009, 2010, 2011
Free Software Foundation, Inc.
+;; Copyright (C) 2000, 2007
-2013
Free Software Foundation, Inc.
;; Author: Daiki Ueno <ueno@unixuser.org>
;; Keywords: SASL
;; Author: Daiki Ueno <ueno@unixuser.org>
;; Keywords: SASL
@@
-183,7
+183,7
@@
It contain at least 64 bits of entropy."
;; Don't use microseconds from (current-time), they may be unsupported.
;; Instead we use this randomly inited counter.
(setq sasl-unique-id-char
;; Don't use microseconds from (current-time), they may be unsupported.
;; Instead we use this randomly inited counter.
(setq sasl-unique-id-char
- (% (1+ (or sasl-unique-id-char (logand (random
t
) (1- (lsh 1 20)))))
+ (% (1+ (or sasl-unique-id-char (logand (random) (1- (lsh 1 20)))))
;; (current-time) returns 16-bit ints,
;; and 2^16*25 just fits into 4 digits i base 36.
(* 25 25)))
;; (current-time) returns 16-bit ints,
;; and 2^16*25 just fits into 4 digits i base 36.
(* 25 25)))