master 197afa4de3 1/2: ; * src/fns.c (Fcopy_alist): More accurate error type

[Mattias Engdegård]

branch: master
commit 197afa4de340679e18d7b91d50c82d2e14a2699b
Author: Mattias Engdegård <mattiase@acm.org>
Commit: Mattias Engdegård <mattiase@acm.org>

    ; * src/fns.c (Fcopy_alist): More accurate error type
---
 src/fns.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/fns.c b/src/fns.c
index 964141f338..3e5a83d03d 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -1415,9 +1415,9 @@ are shared, however.
 Elements of ALIST that are not conses are also shared.  */)
   (Lisp_Object alist)
 {
+  CHECK_LIST (alist);
   if (NILP (alist))
     return alist;
-  CHECK_CONS (alist);
   alist = Fcopy_sequence (alist);
   for (Lisp_Object tem = alist; !NILP (tem); tem = XCDR (tem))
     {