Mercurial > emacs

changeset 87224:e26cf770952c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(calc-set-mode-line): Use `math-lang-name' to set language name.
author Jay Belanger <jay.p.belanger@gmail.com>
date Tue, 11 Dec 2007 04:05:52 +0000
parents e9cba8ba37e1
children 61147850ffcd
files lisp/calc/calc.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/calc/calc.el	Tue Dec 11 04:04:26 2007 +0000
+++ b/lisp/calc/calc.el	Tue Dec 11 04:05:52 2007 +0000
@@ -1675,8 +1675,8 @@
 			   (t (format "Radix%d " calc-number-radix)))
 		     (if calc-leading-zeros "Zero " "")
 		     (cond ((null calc-language) "")
-			   ((eq calc-language 'tex) "TeX ")
-			   ((eq calc-language 'latex) "LaTeX ")
+                           ((get calc-language 'math-lang-name)
+                            (concat (get calc-language 'math-lang-name) " "))
 			   (t (concat
 			       (capitalize (symbol-name calc-language))
 			       " ")))