branch: elpa/parseclj commit 4d0e780e00f1828b00c43099e6eebc6582998f72 Author: Arne Brasseur <a...@arnebrasseur.net> Commit: Arne Brasseur <a...@arnebrasseur.net>
More warning fixes --- parseclj-alist.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/parseclj-alist.el b/parseclj-alist.el index dcca15f598..5bc3719cc0 100644 --- a/parseclj-alist.el +++ b/parseclj-alist.el @@ -27,6 +27,8 @@ ;;; Code: +(require 'map) + (defun parseclj-alist (&rest kvs) "Create an association list from the given keys and values KVS. Arguments are simply provided in sequence, rather than as lists or cons cells. @@ -82,7 +84,7 @@ For example: (parseclj-hash-table :foo 123 :bar 456)" ;; Emacs 27: (map-merge 'alist l1 l2) (let ((keys (delete-dups (append (mapcar #'car l1) (mapcar #'car l2)))) (res '())) - (mapcar + (mapc (lambda (key) (push (or (assoc key l2) (assoc key l1))