# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 738438623 0
# Node ID 05c3ef28bb6ba622e490b0a3597adf3379e187fb
# Parent  86652a5c442bde20b84bafde10c8be1d919f4906
(Fcurrent_input_mode): Fix the call to Flist.

diff -r 86652a5c442b -r 05c3ef28bb6b src/keyboard.c
--- a/src/keyboard.c	Wed May 26 17:43:22 1993 +0000
+++ b/src/keyboard.c	Wed May 26 17:50:23 1993 +0000
@@ -4631,7 +4631,7 @@
   val[2] = meta_key == 2 ? make_number (0) : meta_key == 1 ? Qt : Qnil;
   XFASTINT (val[3]) = quit_char;
 
-  return Flist (val, sizeof (val) / sizeof (val[0]));
+  return Flist (sizeof (val) / sizeof (val[0]), val);
 }