From: Andrew Innes <andrewi@gnu.org>
Date: Mon, 5 Nov 2001 23:15:36 +0000 (+0000)
Subject: (Fw32_set_keyboard_layout): Use CHECK_NUMBER_CAR and
X-Git-Tag: ttn-vms-21-2-B4~18803
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f45320928a1a88df3fad4b4dca7761034547f9b7;p=emacs.git

(Fw32_set_keyboard_layout): Use CHECK_NUMBER_CAR and
CHECK_NUMBER_CDR.
---

diff --git a/src/w32proc.c b/src/w32proc.c
index a808bc5e001..56ec9349e8d 100644
--- a/src/w32proc.c
+++ b/src/w32proc.c
@@ -2094,8 +2094,8 @@ If successful, the new layout id is returned, otherwise nil.")
   DWORD kl;
 
   CHECK_CONS (layout);
-  CHECK_NUMBER (XCAR (layout));
-  CHECK_NUMBER (XCDR (layout));
+  CHECK_NUMBER_CAR (layout);
+  CHECK_NUMBER_CDR (layout);
 
   kl = (XINT (XCAR (layout)) & 0xffff)
     | (XINT (XCDR (layout)) << 16);