diff options
Diffstat (limited to 'lisp/epa-ks.el')
-rw-r--r-- | lisp/epa-ks.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/epa-ks.el b/lisp/epa-ks.el index ebdb1274218..35caa1a93c5 100644 --- a/lisp/epa-ks.el +++ b/lisp/epa-ks.el @@ -149,8 +149,7 @@ If EXACT is non-nil, don't accept approximate matches." (cond ((null epa-keyserver) (user-error "Empty keyserver pool")) ((listp epa-keyserver) - (nth (random (length epa-keyserver)) - epa-keyserver)) + (seq-random-elt epa-keyserver)) ((stringp epa-keyserver) epa-keyserver) ((error "Invalid type for `epa-keyserver'"))) |