# HG changeset patch
# User Kim F. Storm <storm@cua.dk>
# Date 1152710373 0
# Node ID a322faa9b90c91cb5841a544f2e73c101fa35688
# Parent  b4bcd3aefbe87a09bdaebf4159946939782f5541
(Fmac_get_preference): Use CHECK_LIST_END.

diff -r b4bcd3aefbe8 -r a322faa9b90c src/mac.c
--- a/src/mac.c	Wed Jul 12 13:19:27 2006 +0000
+++ b/src/mac.c	Wed Jul 12 13:19:33 2006 +0000
@@ -4625,8 +4625,7 @@
       CHECK_CONS (key);
       for (tmp = key; CONSP (tmp); tmp = XCDR (tmp))
 	CHECK_STRING_CAR (tmp);
-      if (!NILP (tmp))
-	wrong_type_argument (Qlistp, key);
+      CHECK_LIST_END (tmp, key);
     }
   if (!NILP (application))
     CHECK_STRING (application);