;; Contact <francois@fleuret.org> for comments & bug reports ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-;; Is it me, or the slave mode of mplayer is ugly to parse ? Did I
-;; miss something ?
+;; Is it me, or the slave mode of mplayer is ugly to parse? Did I miss
+;; something?
(defcustom media/mplayer/args nil
"List of arguments for mplayer."
:group 'media)
(defcustom media/playlist-at-top nil
- "Should the playlists be created at the top of the media buffer ?"
+ "Should the playlists be created at the top of the media buffer?"
:type 'bool
:group 'media)
(defcustom media/add-current-song-to-interrupted-when-killing nil
- "Should we save the current song with time in the Interrupted playlist ?"
+ "Should we save the current song with time in the Interrupted playlist?"
:type 'bool
:group 'media)
(defcustom media/do-not-remove-nonexisting-entries nil
- "Should we remove the entries corresponding to a non-existing file when saving the playlists ?"
+ "Should we remove the entries corresponding to a non-existing file when saving the playlists?"
:type 'bool
:group 'media)
:group 'media)
(defcustom media/continue-mode nil
- "Should the player start the next song in the buffer when the current terminates ?"
+ "Should the player start the next song in the buffer when the current terminates?"
:type 'boolean
:group 'media)
(defcustom media/expert nil
- "Should the keymap help be shown ?"
+ "Should the keymap help be shown?"
:type 'boolean
:group 'media)
(unless (condition-case nil
(media/save-playlists)
- (error (not (y-or-n-p "Can not save the playlists. Still kill the media buffer ? "))))
+ (error (not (y-or-n-p "Can not save the playlists. Still kill the media buffer? "))))
(kill-buffer media/buffer))
)