* lisp/cus-dep.el: Use lexical-binding

diff --git a/lisp/cus-dep.el b/lisp/cus-dep.el
index f0b108b77d6d33ddcc7e3e48f3744c4fa8d84b17..c14a45ca775189d17fd073be5ca2c66b7b3649b8 100644 (file)
--- 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))