# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1050103062 0
# Node ID 37d227b879addc48af3f0e9dc3bac18a6be2566f
# Parent  ff982d8c077209d3ac6fe8dfdaa694a8e071165a
(Fformat): Lisp_Object/int mixup.
(format2): Remove unused var numargs.

diff -r ff982d8c0772 -r 37d227b879ad src/editfns.c
--- a/src/editfns.c	Fri Apr 11 22:40:58 2003 +0000
+++ b/src/editfns.c	Fri Apr 11 23:17:42 2003 +0000
@@ -3674,7 +3674,8 @@
 	     and ARGN is the number of the next arg we will come to.  */
 	  for (list = props; CONSP (list); list = XCDR (list))
 	    {
-	      Lisp_Object item, pos;
+	      Lisp_Object item;
+	      int pos;
 
 	      item = XCAR (list);
 
@@ -3753,7 +3754,6 @@
      Lisp_Object arg0, arg1;
 {
   Lisp_Object args[3];
-  int numargs;
   args[0] = build_string (string1);
   args[1] = arg0;
   args[2] = arg1;