(reorder_modifiers): Use XINT.

c313fc48 · Richard M. Stallman · acd04c87 · c313fc48
Commit c313fc48 authored May 04, 1995 by Richard M. Stallman
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

src/keyboard.c src/keyboard.c +1 -1

No files found.
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -3678,7 +3678,7 @@ reorder_modifiers (symbol)
  Lisp_Object parsed;

  parsed = parse_modifiers (symbol);
-  return apply_modifiers (XCONS (XCONS (parsed)->cdr)->car,
+  return apply_modifiers (XINT (XCONS (XCONS (parsed)->cdr)->car),
 			  XCONS (parsed)->car);
 }