diff options
| -rw-r--r-- | lisp/calc/calc-embed.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/calc/calc-embed.el b/lisp/calc/calc-embed.el index 5fd77fe625..b3c5a4cff6 100644 --- a/lisp/calc/calc-embed.el +++ b/lisp/calc/calc-embed.el @@ -557,7 +557,7 @@ The command \\[yank] can retrieve it from there." (not (eq (cdr found) 'default))) (progn (if (eq (setq value (cdr (car v))) 'default) - (setq value (cdr (assq (car (car v)) calc-mode-var-list)))) + (setq value (list (nth 1 (assq (car (car v)) calc-mode-var-list))))) (equal (symbol-value (car (car v))) value)) (progn (setq changed t) |