calc/calc-embed.el (calc-embedded-set-modes): Use

`calc-mode-var-list' correctly.

calc/calc-embed.el (calc-embedded-set-modes): Use
`calc-mode-var-list' correctly.
f10b7b1b · Jay Belanger · 7b2cda38 · f10b7b1b
Commit f10b7b1b authored Sep 15, 2004 by Jay Belanger
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

lisp/calc/calc-embed.el lisp/calc/calc-embed.el +1 -1

No files found.
--- 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)