From f992e4c98b1d472acb802ea2a149f087c2656034 Mon Sep 17 00:00:00 2001 From: Yoni Rabkin Date: Sat, 17 Apr 2021 16:55:01 -0400 Subject: *.el: Remove redundant `:group` arguments Also, remove some redundant leading `*` in defcustom docstrings Patch by Stefan Monnier --- emms-player-mpd.el | 34 ++++++++++++---------------------- 1 file changed, 12 insertions(+), 22 deletions(-) (limited to 'emms-player-mpd.el') 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 , Jose Antonio Ortega Ruiz ;; @@ -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 -- cgit v1.2.3