(Fmap_char_table): Call map_char_table with correct args.

1 files changed, 1 insertions, 1 deletions

diff --git a/src/fns.c b/src/fns.c
index ef1bbffe135..74f256eaca4 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -1377,7 +1377,7 @@ The key is always a possible RANGE argument to `set-char-table-range'.")
   Lisp_Object keyvec;
   Lisp_Object *indices = (Lisp_Object *) alloca (10 * sizeof (Lisp_Object));
 
-  map_char_table (function, NULL, chartable, 0, indices);
+  map_char_table (NULL, function, chartable, 0, indices);
   return Qnil;
 }