[Emacs-diffs] Changes to emacs/lisp/calc/calc-embed.el

[Jay Belanger]

Index: emacs/lisp/calc/calc-embed.el
diff -c emacs/lisp/calc/calc-embed.el:1.8 emacs/lisp/calc/calc-embed.el:1.9
*** emacs/lisp/calc/calc-embed.el:1.8   Mon Feb 16 17:16:22 2004
--- emacs/lisp/calc/calc-embed.el       Wed Sep 15 16:49:04 2004
***************
*** 557,563 ****
               (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))))
            (equal (symbol-value (car (car v))) value))
          (progn
            (setq changed t)
--- 557,563 ----
               (not (eq (cdr found) 'default)))
          (progn
            (if (eq (setq value (cdr (car v))) 'default)
!               (setq value (list (nth 1 (assq (car (car v)) 
calc-mode-var-list)))))
            (equal (symbol-value (car (car v))) value))
          (progn
            (setq changed t)