;;; let-alist.el --- Easily let-bind values of an assoc-list by their names -*- lexical-binding: t; -*-
-;; Copyright (C) 2014 Free Software Foundation, Inc.
+;; Copyright (C) 2014-2015 Free Software Foundation, Inc.
;; Author: Artur Malabarba <bruce.connor.am@gmail.com>
;; Maintainer: Artur Malabarba <bruce.connor.am@gmail.com>
-;; Version: 1.0.2
+;; Version: 1.0.3
;; Keywords: extensions lisp
;; Prefix: let-alist
;; Separator: -
inside the original alist by using dots inside the symbol, as
displayed in the example above."
(declare (indent 1) (debug t))
- (let ((var (gensym "alist")))
+ (let ((var (make-symbol "alist")))
`(let ((,var ,alist))
(let ,(mapcar (lambda (x) `(,(car x) ,(let-alist--access-sexp (car x) var)))
(delete-dups (let-alist--deep-dot-search body)))