diff options
author | Nicolas Petton <nicolas@petton.fr> | 2015-06-16 23:04:03 +0200 |
---|---|---|
committer | Nicolas Petton <nicolas@petton.fr> | 2015-06-16 23:04:03 +0200 |
commit | 7d5c120fedd86b911bb9ffe423920e701f63a7c3 (patch) | |
tree | 612d473e816c07145d8547ec77a5b208ee23d7ad /lisp/emacs-lisp | |
parent | 3986489aef3779b299c099e077d91e0d4b09a2e5 (diff) | |
download | emacs-7d5c120fedd86b911bb9ffe423920e701f63a7c3.tar.gz |
* lisp/emacs-lisp/map.el (map-into): Fix a byte-compiler warning.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r-- | lisp/emacs-lisp/map.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/map.el b/lisp/emacs-lisp/map.el index dd7fb9174ef..f5a9fd9ee12 100644 --- a/lisp/emacs-lisp/map.el +++ b/lisp/emacs-lisp/map.el @@ -218,7 +218,7 @@ MAP can be a list, hash-table or array." map)) (defun map-filter (pred map) - "Return an alist of the key/val pairs for which (PRED key val) is non-nil in MAP. + "Return an alist of key/val pairs for which (PRED key val) is non-nil in MAP. MAP can be a list, hash-table or array." (delq nil (map-apply (lambda (key val) @@ -297,7 +297,7 @@ MAP can be a list, hash-table or array." (pcase type (`list (map-pairs map)) (`hash-table (map--into-hash-table map)) - (t (error "Not a map type name: %S" type)))) + (_ (error "Not a map type name: %S" type)))) (defun map--apply-alist (function map) "Private function used to apply FUNCTION over MAP, MAP being an alist." |