*.el: Remove redundant `:group` arguments

Also, remove some redundant leading `*` in defcustom docstrings

Patch by Stefan Monnier <monnier@iro.umontreal.ca>

1 files changed, 12 insertions, 22 deletions

diff --git a/emms-player-mpd.el b/emms-player-mpd.el
index 78fd857..1a4f407 100644
--- a/emms-player-mpd.el
+++ b/emms-player-mpd.el
@@ -1,6 +1,6 @@
 ;;; emms-player-mpd.el --- MusicPD support for EMMS  -*- lexical-binding: t; -*-
 
-;; Copyright (C) 2005, 2006, 2007, 2008, 2009, 2014 Free Software Foundation, Inc.
+;; Copyright (C) 2005-2021  Free Software Foundation, Inc.
 
 ;; Author: Michael Olson <mwolson@gnu.org>, Jose Antonio Ortega Ruiz
 ;; <jao@gnu.org>
@@ -125,9 +125,8 @@
 (defcustom emms-player-mpd (emms-player 'emms-player-mpd-start
                                         'emms-player-mpd-stop
                                         'emms-player-mpd-playable-p)
- "*Parameters for the MusicPD player."
- :type '(cons symbol alist)
- :group 'emms-player-mpd)
+  "Parameters for the MusicPD player."
+  :type '(cons symbol alist))
 
 (defcustom emms-player-mpd-music-directory nil
   "The value of 'music_directory' in your MusicPD configuration file.
@@ -139,8 +138,7 @@ config."
   ;; next line, where there is more space to work with
   :type '(choice :format "%{%t%}:\n   %[Value Menu%] %v"
                  (const nil)
-                 directory)
-  :group 'emms-player-mpd)
+                 directory))
 
 (defun emms-player-mpd-get-supported-regexp ()
   "Returns a regexp of file extensions that MusicPD supports,
@@ -196,30 +194,25 @@ or nil if we cannot figure it out."
   :set (function
         (lambda (sym value)
           (set sym value)
-          (emms-player-set emms-player-mpd 'regex value)))
-  :group 'emms-player-mpd)
+          (emms-player-set emms-player-mpd 'regex value))))
 
 (defcustom emms-player-mpd-connect-function 'open-network-stream
   "Function used to initiate the connection to MusicPD.
 It should take same arguments as `open-network-stream' does."
-  :type 'function
-  :group 'emms-player-mpd)
+  :type 'function)
 
 (defcustom emms-player-mpd-server-name (or (getenv "MPD_HOST") "localhost")
   "The MusicPD server that we should connect to."
-  :type 'string
-  :group 'emms-player-mpd)
+  :type 'string)
 
 (defcustom emms-player-mpd-server-port (or (getenv "MPD_PORT") "6600")
   "The port of the MusicPD server that we should connect to."
-  :type '(choice number string)
-  :group 'emms-player-mpd)
+  :type '(choice number string))
 
 (defcustom emms-player-mpd-server-password nil
   "The password for the MusicPD server that we should connect to."
   :type '(choice (const :tag "None" nil)
-                 string)
-  :group 'emms-player-mpd)
+                 string))
 
 (defcustom emms-player-mpd-check-interval 1
   "How often to check to see whether MusicPD has advanced to the
@@ -230,14 +223,12 @@ performed.
 This variable is used only if `emms-player-mpd-sync-playlist' is
 non-nil."
   :type '(choice (const :tag "Disable check" nil)
-                 number)
-  :group 'emms-player-mpd)
+                 number))
 
 (defcustom emms-player-mpd-verbose nil
   "Whether to provide notifications for server connection events
 and errors."
-  :type 'boolean
-  :group 'emms-player-mpd)
+  :type 'boolean)
 
 (defcustom emms-player-mpd-sync-playlist t
   "Whether to synchronize the EMMS playlist with the MusicPD playlist.
@@ -246,8 +237,7 @@ If your EMMS playlist contains music files rather than playlists,
 leave this set to non-nil.
 
 If your EMMS playlist contains stored playlists, set this to nil."
-  :type 'boolean
-  :group 'emms-player-mpd)
+  :type 'boolean)
 
 (emms-player-set emms-player-mpd
                  'regex