From 3f4c2f813adeffc6814ee01116704ccf420c3bd9 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Sat, 15 Jun 2019 17:09:08 +0200 Subject: [PATCH] Make obsolete function zip-lists work again * lisp/obsolete/cl-compat.el (zip-lists): Use cl-mapcan instead of mapcan; mapcan now takes only two parameters. --- lisp/obsolete/cl-compat.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/obsolete/cl-compat.el b/lisp/obsolete/cl-compat.el index b2735826ce1..7882705fe9f 100644 --- a/lisp/obsolete/cl-compat.el +++ b/lisp/obsolete/cl-compat.el @@ -142,7 +142,7 @@ (Values (mapcar* 'list newsyms oldforms) newsyms))) (defun zip-lists (evens odds) - (mapcan 'list evens odds)) + (cl-mapcan 'list evens odds)) (defun unzip-lists (list) (let ((e nil) (o nil)) -- 2.39.2