emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/load-dir 588b83e39d: * load-dir.el: Remove redundant `:


From: Stefan Monnier
Subject: [elpa] externals/load-dir 588b83e39d: * load-dir.el: Remove redundant `:group` args
Date: Wed, 2 Mar 2022 17:00:24 -0500 (EST)

branch: externals/load-dir
commit 588b83e39de1f0f5d7812873cd90998af79a2d19
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>

    * load-dir.el: Remove redundant `:group` args
---
 load-dir.el | 7 +------
 1 file changed, 1 insertion(+), 6 deletions(-)

diff --git a/load-dir.el b/load-dir.el
index 3a644a472f..169f73ce18 100644
--- a/load-dir.el
+++ b/load-dir.el
@@ -52,23 +52,19 @@
 
 (defcustom load-dir-debug t
   "Debugging messages toggle, default to t."
-  :group 'load-dir
   :type 'boolean)
 
 (defcustom load-dir-recursive nil
   "Whether subdirectories should be loaded too."
-  :group 'load-dir
   :type 'boolean)
 
 (defcustom load-dir-ignore-errors nil
   "Whether errors in the loaded files should be ignored."
-  :group 'load-dir
   :type 'boolean)
 
 (defcustom load-dir-ignored '("\\.dir-locals")
   "This list of regular expressions tells load-dir to ignore some filenames.
 The match is a substring check against the whole filename."
-  :group 'load-dir
   :tag "Ignore these regexps while loading a directory"
   :type '(repeat :tag "Filename regexp" string))
 
@@ -80,7 +76,6 @@ If t, only files in ~/.emacs.d/load.d will be loaded.
 If a single directory name, only files in that directory will be loaded.
 If a list of directory names, all files found in all the
 directories will be loaded."
-  :group 'load-dir
   :tag "What directories to load"
   :type '(choice (const :tag "Load all from ~/.emacs.d/load.d" t)
                  (const :tag "Don't load anything" nil)
@@ -142,7 +137,7 @@ Recurses into subdirectories if `load-dir-recursive' is t."
 (defun load-dir-debug (&rest args)
   "Print a debug message like `message' if `load-dir-debug' is set."
   (when load-dir-debug
-    (apply 'message args)))
+    (apply #'message args)))
 
 ;;;###autoload
 (add-hook 'after-init-hook



reply via email to

[Prev in Thread] Current Thread [Next in Thread]