(reorder_modifiers): Use XINT.

diff --git a/src/keyboard.c b/src/keyboard.c
index 75d334ee2b1bae3287526ce1483e094ab3fe1ca9..20b1decdd5ca2adcc2d69154969680a267a86833 100644 (file)
--- 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);
 }