From 1867200e4547380c24badc29dd0d88cbbd301a16 Mon Sep 17 00:00:00 2001 From: Jay Belanger Date: Tue, 8 Feb 2005 05:02:09 +0000 Subject: [PATCH] (math-compose-expr): Fix a check for language type. --- lisp/calc/calccomp.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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( " -- 2.39.2