diff options
| author | Jay Belanger <jay.p.belanger@gmail.com> | 2005-02-08 05:02:09 +0000 |
|---|---|---|
| committer | Jay Belanger <jay.p.belanger@gmail.com> | 2005-02-08 05:02:09 +0000 |
| commit | 1867200e4547380c24badc29dd0d88cbbd301a16 (patch) | |
| tree | 5164a4707aa71fa3c802c8cbb9f0428144be821e /lisp/calc/calccomp.el | |
| parent | bae45dc3a992c4bdd372172b9e6f16d6bab3d554 (diff) | |
| download | emacs-1867200e4547380c24badc29dd0d88cbbd301a16.tar.gz | |
(math-compose-expr): Fix a check for language type.
Diffstat (limited to 'lisp/calc/calccomp.el')
| -rw-r--r-- | lisp/calc/calccomp.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/calc/calccomp.el b/lisp/calc/calccomp.el index 26ae8c1975c..eff7df2373d 100644 --- a/lisp/calc/calccomp.el +++ b/lisp/calc/calccomp.el @@ -908,7 +908,7 @@ (setq func (substring func 0 (- n))) (while (>= (setq n (1- n)) 0) (setq func (concat func " prime"))))) - (cond ((and (eq calc-language '(tex latex)) + (cond ((and (memq calc-language '(tex latex)) (or (> (length a) 2) (not (math-tex-expr-is-flat (nth 1 a))))) (setq left "\\left( " |