diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2021-04-10 17:11:58 -0400 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2021-04-10 17:11:58 -0400 |
| commit | 56e8d969f545446c00a82af6f2e5bc7ad535a359 (patch) | |
| tree | 47eed126783363b89a198bcf64c2c0c4b3f90d3b | |
| parent | 26e1d854d1d40a63896272162f299a90e5a31043 (diff) | |
| download | emacs-56e8d969f545446c00a82af6f2e5bc7ad535a359.tar.gz | |
* lisp/cus-dep.el: Use lexical-binding
| -rw-r--r-- | lisp/cus-dep.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/cus-dep.el b/lisp/cus-dep.el index f0b108b77d6..c14a45ca775 100644 --- a/lisp/cus-dep.el +++ b/lisp/cus-dep.el @@ -1,4 +1,4 @@ -;;; cus-dep.el --- find customization dependencies +;;; cus-dep.el --- find customization dependencies -*- lexical-binding: t; -*- ;; ;; Copyright (C) 1997, 2001-2021 Free Software Foundation, Inc. ;; @@ -131,7 +131,7 @@ Usage: emacs -batch -l ./cus-dep.el -f custom-make-dependencies DIRS" 'custom-where name) ;; Eval to get the 'custom-group, -tag, ;; -version, group-documentation etc properties. - (eval expr)) + (eval expr t)) ;; Eval failed for some reason. Eg maybe the ;; defcustom uses something defined earlier ;; in the file (we haven't loaded the file). @@ -163,7 +163,7 @@ Usage: emacs -batch -l ./cus-dep.el -f custom-make-dependencies DIRS" (let ((members (get symbol 'custom-group)) where found) (when members - (dolist (member (mapcar 'car members)) + (dolist (member (mapcar #'car members)) (setq where (get member 'custom-where)) (unless (or (null where) (member where found)) |