# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1018590904 0
# Node ID 403a35115d4aa19f5e95d558f078eb4b7a041e2d
# Parent  eacabd6d7bc9ce677d08eae8e237c5f056121de0
(gen_help_event): int/Lisp_Object confusion.

diff -r eacabd6d7bc9 -r 403a35115d4a src/keyboard.c
--- a/src/keyboard.c	Fri Apr 12 05:52:19 2002 +0000
+++ b/src/keyboard.c	Fri Apr 12 05:55:04 2002 +0000
@@ -3457,7 +3457,7 @@
       bufp->arg = object;
       bufp->x = WINDOWP (window) ? window : frame;
       bufp->y = help;
-      bufp->code = make_number (pos);
+      bufp->code = pos;
       return 1;
     }
   return 0;