From: Jay Belanger <jay.p.belanger@gmail.com>
Date: Tue, 8 Feb 2005 05:02:09 +0000 (+0000)
Subject: (math-compose-expr): Fix a check for language type.
X-Git-Tag: ttn-vms-21-2-B4~2361
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1867200e4547380c24badc29dd0d88cbbd301a16;p=emacs.git

(math-compose-expr): Fix a check for language type.
---

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( "