# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1006210002 0
# Node ID 6e7061ac43fd8da28881d43f43ae27a6df27d6c7
# Parent  3db86c7bf56f03c0bdc695f1897fc77ce75b4b47
(describe_category): Add dummy arg.
(describe_category_1): Update call to describe_vector.

diff -r 3db86c7bf56f -r 6e7061ac43fd src/category.c
--- a/src/category.c	Mon Nov 19 22:46:37 2001 +0000
+++ b/src/category.c	Mon Nov 19 22:46:42 2001 +0000
@@ -474,8 +474,8 @@
 /* Dump category table to buffer in human-readable format */
 
 static void
-describe_category (value)
-    Lisp_Object value;
+describe_category (value, args)
+    Lisp_Object value, args;
 {
   Lisp_Object mnemonics;
 
@@ -512,7 +512,7 @@
 {
   struct buffer *old = current_buffer;
   set_buffer_internal (XBUFFER (Vstandard_output));
-  describe_vector (vector, Qnil, describe_category, 0, Qnil, Qnil,
+  describe_vector (vector, Qnil, Qnil, describe_category, 0, Qnil, Qnil,
 		   (int *)0, 0);
   {
     int i;
@@ -544,7 +544,7 @@
     {
       vector = XCHAR_TABLE (vector)->parent;
       insert_string ("\nThe parent category table is:");
-      describe_vector (vector, Qnil, describe_category, 0, Qnil, Qnil,
+      describe_vector (vector, Qnil, Qnil, describe_category, 0, Qnil, Qnil,
 		       (int *) 0, 0);
     }