summaryrefslogtreecommitdiff
path: root/lisp/calc/calc-comb.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/calc/calc-comb.el')
-rw-r--r--lisp/calc/calc-comb.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/calc/calc-comb.el b/lisp/calc/calc-comb.el
index 24e3e5f182e..262db6c9bda 100644
--- a/lisp/calc/calc-comb.el
+++ b/lisp/calc/calc-comb.el
@@ -601,7 +601,7 @@
;;; Shuffling algorithm from Numerical Recipes, section 7.1.
(defun math-random-digit ()
(let (i math-random-last)
- (or (eq var-RandSeed math-last-RandSeed)
+ (or (and var-RandSeed (eq var-RandSeed math-last-RandSeed))
(math-init-random-base))
(or math-random-cache
(progn