1 files changed, 1 insertions, 2 deletions

diff --git a/src/mac.c b/src/mac.c
index e25ed435342..4652757fab3 100644
--- a/src/mac.c
+++ b/src/mac.c
@@ -4625,8 +4625,7 @@ otherwise.  */)
       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);