Mercurial > emacs

diff lisp/calc/calc-embed.el @ 57116:344baab70c72

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
calc/calc-embed.el (calc-embedded-set-modes): Use `calc-mode-var-list' correctly.
author Jay Belanger <jay.p.belanger@gmail.com>
date Wed, 15 Sep 2004 16:49:04 +0000
parents 28c3a99598f0
children 59f299fd62df 2e44ef8c14b4
line wrap: on
line diff
--- a/lisp/calc/calc-embed.el	Wed Sep 15 16:48:19 2004 +0000
+++ b/lisp/calc/calc-embed.el	Wed Sep 15 16:49:04 2004 +0000
@@ -557,7 +557,7 @@
 	       (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)