summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRémi Vanicat <vanicat@debian.org>2020-01-15 06:27:36 +0100
committerRémi Vanicat <vanicat@debian.org>2020-01-15 06:27:36 +0100
commit3ec267ecdbeefa2fec745d06d0f0013695244404 (patch)
treef8532d0b956480d0a0b921aaf57dc9066cdf58ac
parent78b1bb3d44ca92d1b3653af3e10989a2da960792 (diff)
New upstream version 1.0.6
-rw-r--r--let-alist.el8
1 files changed, 5 insertions, 3 deletions
diff --git a/let-alist.el b/let-alist.el
index 43973c2..96b397f 100644
--- a/let-alist.el
+++ b/let-alist.el
@@ -1,10 +1,10 @@
;;; let-alist.el --- Easily let-bind values of an assoc-list by their names -*- lexical-binding: t; -*-
-;; Copyright (C) 2014-2017 Free Software Foundation, Inc.
+;; Copyright (C) 2014-2019 Free Software Foundation, Inc.
;; Author: Artur Malabarba <emacs@endlessparentheses.com>
;; Package-Requires: ((emacs "24.1"))
-;; Version: 1.0.5
+;; Version: 1.0.6
;; Keywords: extensions lisp
;; Prefix: let-alist
;; Separator: -
@@ -25,7 +25,7 @@
;; GNU General Public License for more details.
;; You should have received a copy of the GNU General Public License
-;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
+;; along with GNU Emacs. If not, see <https://www.gnu.org/licenses/>.
;;; Commentary:
@@ -75,6 +75,8 @@ symbol, and each cdr is the same symbol without the `.'."
;; Return the cons cell inside a list, so it can be appended
;; with other results in the clause below.
(list (cons data (intern (replace-match "" nil nil name)))))))
+ ((vectorp data)
+ (apply #'nconc (mapcar #'let-alist--deep-dot-search data)))
((not (consp data)) nil)
((eq (car data) 'let-alist)
;; For nested ‘let-alist’ forms, ignore symbols appearing in the