diff options
| author | Jay Belanger <jay.p.belanger@gmail.com> | 2004-09-15 16:49:04 +0000 |
|---|---|---|
| committer | Jay Belanger <jay.p.belanger@gmail.com> | 2004-09-15 16:49:04 +0000 |
| commit | f10b7b1b5af2d282b9586cfa32f60b1180a230ee (patch) | |
| tree | 703e1567165273e7e0a6811547a6a4381107571c /lisp/calc/calc-embed.el | |
| parent | 7b2cda3878a44607f163c476a816c5d0d0b50511 (diff) | |
| download | emacs-f10b7b1b5af2d282b9586cfa32f60b1180a230ee.tar.gz | |
calc/calc-embed.el (calc-embedded-set-modes): Use
`calc-mode-var-list' correctly.
Diffstat (limited to 'lisp/calc/calc-embed.el')
| -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 5fd77fe625f..b3c5a4cff64 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) |