diff options
| author | Yoni Rabkin <yoni@rabkins.net> | 2021-04-17 16:55:01 -0400 |
|---|---|---|
| committer | Yoni Rabkin <yoni@rabkins.net> | 2021-04-17 16:55:01 -0400 |
| commit | f992e4c98b1d472acb802ea2a149f087c2656034 (patch) | |
| tree | d923d36742ae97f226e8f9db954176e2cd3f7dde /emms-source-file.el | |
| parent | 9412bf085da449fba77df89933ef22bff147a573 (diff) | |
*.el: Remove redundant `:group` arguments
Also, remove some redundant leading `*` in defcustom docstrings
Patch by Stefan Monnier <monnier@iro.umontreal.ca>
Diffstat (limited to 'emms-source-file.el')
| -rw-r--r-- | emms-source-file.el | 24 |
1 files changed, 9 insertions, 15 deletions
diff --git a/emms-source-file.el b/emms-source-file.el index ed8d832..9060528 100644 --- a/emms-source-file.el +++ b/emms-source-file.el @@ -1,7 +1,6 @@ ;;; emms-source-file.el --- EMMS sources from the filesystem. -*- lexical-binding: t; -*- -;; Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008, -;; 2009 Free Software Foundation, Inc. +;; Copyright (C) 2003-2021 Free Software Foundation, Inc. ;; Author: Jorgen Schäfer <forcer@forcix.cx> ;; Keywords: emms, mp3, mpeg, multimedia @@ -53,9 +52,8 @@ :group 'emms-source) (defcustom emms-source-file-default-directory nil - "*The default directory to look for media files." - :type '(choice (const :tag "None" nil) file) - :group 'emms-source-file) + "The default directory to look for media files." + :type '(choice (const :tag "None" nil) file)) (defcustom emms-source-file-directory-tree-function 'emms-source-file-directory-tree-internal @@ -69,8 +67,7 @@ be slow. find, but it's faster." :type 'function :options '(emms-source-file-directory-tree-internal - emms-source-file-directory-tree-find) - :group 'emms-source-file) + emms-source-file-directory-tree-find)) (defcustom emms-source-file-exclude-regexp (concat "\\`\\(#.*#\\|.*,v\\|.*~\\|\\.\\.?\\|\\.#.*\\|,.*\\)\\'\\|" @@ -80,18 +77,15 @@ find, but it's faster." You should set case-fold-search to nil before using this regexp in code." - :type 'regexp - :group 'emms-source-file) + :type 'regexp) (defcustom emms-source-file-gnu-find "find" - "*The program name for GNU find." - :type 'string - :group 'emms-source-file) + "The program name for GNU find." + :type 'string) (defcustom emms-source-file-directory-hint-p t - "*When non-nil, guess the directory based on a track at point." - :type 'boolean - :group 'emms-source-file) + "When non-nil, guess the directory based on a track at point." + :type 'boolean) ;; The `read-directory-name' function is not available in Emacs 21. (defalias 'emms-read-directory-name |