/[emacs]/emacs/lisp/calc/calc-embed.el
ViewVC logotype

Diff of /emacs/lisp/calc/calc-embed.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.6.4.1 by handa, Fri Apr 16 12:50:11 2004 UTC revision 1.6.4.2 by miles, Fri Sep 17 14:31:02 2004 UTC
# Line 557  The command \\[yank] can retrieve it fro Line 557  The command \\[yank] can retrieve it fro
557                 (not (eq (cdr found) 'default)))                 (not (eq (cdr found) 'default)))
558            (progn            (progn
559              (if (eq (setq value (cdr (car v))) 'default)              (if (eq (setq value (cdr (car v))) 'default)
560                  (setq value (cdr (assq (car (car v)) calc-mode-var-list))))                  (setq value (list (nth 1 (assq (car (car v)) calc-mode-var-list)))))
561              (equal (symbol-value (car (car v))) value))              (equal (symbol-value (car (car v))) value))
562            (progn            (progn
563              (setq changed t)              (setq changed t)

Legend:
Removed from v.1.6.4.1  
changed lines
  Added in v.1.6.4.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26