# HG changeset patch
# User Jay Belanger <jay.p.belanger@gmail.com>
# Date 1196567114 0
# Node ID 553d66dcf5fda3ddad035d43efb98642699a5ce5
# Parent  15347a4d3180ff2c8a36ae20964e90fb9b1dec02
(math-compose-var): Fix declaration.

diff -r 15347a4d3180 -r 553d66dcf5fd lisp/calc/calc-lang.el
--- a/lisp/calc/calc-lang.el	Sun Dec 02 03:17:22 2007 +0000
+++ b/lisp/calc/calc-lang.el	Sun Dec 02 03:45:14 2007 +0000
@@ -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)