diff options
author | Rémi Vanicat <vanicat@debian.org> | 2020-01-15 06:27:36 +0100 |
---|---|---|
committer | Rémi Vanicat <vanicat@debian.org> | 2020-01-15 06:27:36 +0100 |
commit | ad7208f2db1f35dc44dd9637f82e8b75e67cdf3c (patch) | |
tree | 4a749a2c790ec793faf4c8cbbb1cda2836d15c5f | |
parent | ba142051fcc0e50362fa922d2186633e7b7bdda6 (diff) | |
parent | 3ec267ecdbeefa2fec745d06d0f0013695244404 (diff) |
Update upstream source from tag '1.0.6'
Update to upstream version '1.0.6'
with Debian dir e2623bf69405cb37ccfa1d077e8662fd0416a11e
-rw-r--r-- | let-alist.el | 8 |
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 |