summaryrefslogtreecommitdiff
path: root/lisp/epa-ks.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/epa-ks.el')
-rw-r--r--lisp/epa-ks.el3
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'")))