Mercurial > emacs

comparison lisp/calc/calc.el @ 62776:84d21c375346

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(calc-language-alist): Remove extra defvar.
author Jay Belanger <jay.p.belanger@gmail.com>
date Thu, 26 May 2005 17:59:23 +0000
parents 3848ecb8352f
children bb4c78051de0
comparison
equal deleted inserted replaced
62775:586c19880900 62776:84d21c375346
827 (defvar var-pi '(special-const (math-pi))) 827 (defvar var-pi '(special-const (math-pi)))
828 (defvar var-e '(special-const (math-e))) 828 (defvar var-e '(special-const (math-e)))
829 (defvar var-phi '(special-const (math-phi))) 829 (defvar var-phi '(special-const (math-phi)))
830 (defvar var-gamma '(special-const (math-gamma-const))) 830 (defvar var-gamma '(special-const (math-gamma-const)))
831 (defvar var-Modes '(special-const (math-get-modes-vec))) 831 (defvar var-Modes '(special-const (math-get-modes-vec)))
832
833 (defvar calc-language-alist
834 '((latex-mode . latex)
835 (tex-mode . tex)
836 (plain-tex-mode . tex)
837 (context-mode . tex)
838 (nroff-mode . eqn)
839 (pascal-mode . pascal)
840 (c-mode . c)
841 (c++-mode . c)
842 (fortran-mode . fortran)
843 (f90-mode . fortran))
844 "Alist of major modes with appropriate Calc languages.")
845
846 832
847 (mapcar (lambda (v) (or (boundp v) (set v nil))) 833 (mapcar (lambda (v) (or (boundp v) (set v nil)))
848 calc-local-var-list) 834 calc-local-var-list)
849 835
850 (defvar calc-mode-map 836 (defvar calc-mode-map