]> code.delx.au - gnu-emacs/commitdiff
(Fmap_keymap): Use xsignal1.
authorKim F. Storm <storm@cua.dk>
Tue, 18 Jul 2006 13:28:21 +0000 (13:28 +0000)
committerKim F. Storm <storm@cua.dk>
Tue, 18 Jul 2006 13:28:21 +0000 (13:28 +0000)
src/keymap.c

index 6f57bd6337641a0b73058aee76364894eb5ecc7b..71fd5f03390a16cbc41ca7173b6439bfaa596b82 100644 (file)
@@ -758,7 +758,7 @@ usage: (map-keymap FUNCTION KEYMAP)  */)
   if (INTEGERP (function))
     /* We have to stop integers early since map_keymap gives them special
        significance.  */
-    Fsignal (Qinvalid_function, Fcons (function, Qnil));
+    xsignal1 (Qinvalid_function, function);
   if (! NILP (sort_first))
     return call3 (intern ("map-keymap-internal"), function, keymap, Qt);