[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master fa92b04: * lisp/emacs-lisp/map.el: Restore compatibility with Ema
From: |
Stefan Monnier |
Subject: |
master fa92b04: * lisp/emacs-lisp/map.el: Restore compatibility with Emacs-26 |
Date: |
Tue, 28 Sep 2021 10:29:34 -0400 (EDT) |
branch: master
commit fa92b040c6738de7278605cadeace0c5380a0814
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>
* lisp/emacs-lisp/map.el: Restore compatibility with Emacs-26
Don't use the new `eql` syntax.
---
lisp/emacs-lisp/map.el | 10 +++++-----
1 file changed, 5 insertions(+), 5 deletions(-)
diff --git a/lisp/emacs-lisp/map.el b/lisp/emacs-lisp/map.el
index e0af448..da4502f 100644
--- a/lisp/emacs-lisp/map.el
+++ b/lisp/emacs-lisp/map.el
@@ -5,7 +5,7 @@
;; Author: Nicolas Petton <nicolas@petton.fr>
;; Maintainer: emacs-devel@gnu.org
;; Keywords: extensions, lisp
-;; Version: 3.2
+;; Version: 3.2.1
;; Package-Requires: ((emacs "26"))
;; This file is part of GNU Emacs.
@@ -427,15 +427,15 @@ See `map-into' for all supported values of TYPE."
"Convert MAP into a map of TYPE.")
;; FIXME: I wish there was a way to avoid this η-redex!
-(cl-defmethod map-into (map (_type (eql 'list)))
+(cl-defmethod map-into (map (_type (eql list)))
"Convert MAP into an alist."
(map-pairs map))
-(cl-defmethod map-into (map (_type (eql 'alist)))
+(cl-defmethod map-into (map (_type (eql alist)))
"Convert MAP into an alist."
(map-pairs map))
-(cl-defmethod map-into (map (_type (eql 'plist)))
+(cl-defmethod map-into (map (_type (eql plist)))
"Convert MAP into a plist."
(let (plist)
(map-do (lambda (k v) (setq plist `(,v ,k ,@plist))) map)
@@ -530,7 +530,7 @@ KEYWORD-ARGS are forwarded to `make-hash-table'."
map)
ht))
-(cl-defmethod map-into (map (_type (eql 'hash-table)))
+(cl-defmethod map-into (map (_type (eql hash-table)))
"Convert MAP into a hash-table with keys compared with `equal'."
(map--into-hash map (list :size (map-length map) :test #'equal)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master fa92b04: * lisp/emacs-lisp/map.el: Restore compatibility with Emacs-26,
Stefan Monnier <=