Mercurial > emacs
diff lisp/calc/calc.el @ 87224:e26cf770952c
(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 | e50a2e215441 |
children | 0f888390c9b8 2fcaae6177a5 |
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)) " ")))