From: Jay Belanger <jay.p.belanger@gmail.com>
Date: Sun, 2 Dec 2007 03:45:14 +0000 (+0000)
Subject: (math-compose-var): Fix declaration.
X-Git-Tag: emacs-pretest-23.0.90~9178
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=105140567b269add43b40734a25c8f3608af7a02;p=emacs.git

(math-compose-var): Fix declaration.
---

diff --git a/lisp/calc/calc-lang.el b/lisp/calc/calc-lang.el
index a9c3ce0319e..3141bfd04c3 100644
--- a/lisp/calc/calc-lang.el
+++ b/lisp/calc/calc-lang.el
@@ -35,7 +35,7 @@
 
 ;; Declare functions which are defined elsewhere.
 (declare-function math-compose-vector "calccomp" (a sep prec))
-(declare-function math-compose-var "calccomp" (a))
+(declare-function math-compose-var "calccomp" (a v))
 (declare-function math-tex-expr-is-flat "calccomp" (a))
 (declare-function math-read-factor "calc-aent" ())
 (declare-function math-read-expr-level "calc-aent" (exp-prec &optional exp-term))
@@ -693,7 +693,7 @@
       (if (eq calc-language 'latex)
           (format "\\text{%s}" (symbol-name (nth 1 a)))
         (format "\\hbox{%s}" (symbol-name (nth 1 a))))
-    (math-compose-var a)))
+    (math-compose-var a v)))
 
 (defun math-compose-tex-func (func a)
   (let (left right)