scip/dot-emacs
1
0
Fork 0
mirror of https://codeberg.org/scip/dot-emacs.git synced 2025-12-17 04:20:57 +01:00
Code Issues Packages Projects Releases Wiki Activity

fix indent and fix parens

Browse Source
This commit is contained in:
Thomas von Dein
2023-06-20 12:55:03 +02:00
parent 0387ce1c05
commit f25e3f362b
1 changed files with 11 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

21
lisp/init-audio.el
View File

@@ -25,19 +25,20 @@
(emms-all) (emms-all)
(emms-default-players) (emms-default-players)
(defun tvd-emms-beginning-of-song (defun tvd-emms-beginning-of-song()
(interactive) "Jump to beginning of a song"
(interactive)
(emms-seek-to '00:00)) (emms-seek-to '00:00))
(defun audio-open-playlist (filename &optional wildcards) (defun audio-open-playlist (filename &optional wildcards)
"makes a new EMMS playlist buffer from the playlist of filename" "makes a new EMMS playlist buffer from the playlist of filename"
(interactive (interactive
(find-file-read-args "Find file: " (find-file-read-args "Find file: "
(confirm-nonexistent-file-or-buffer))) (confirm-nonexistent-file-or-buffer)))
(emms-playlist-new (file-name-base filename)) (emms-playlist-new (file-name-base filename))
(switch-to-buffer (file-name-base filename)) (switch-to-buffer (file-name-base filename))
(emms-playlist-set-playlist-buffer) (emms-playlist-set-playlist-buffer)
(emms-play-playlist filename)) (emms-play-playlist filename))
(defun audio-create-playlist(name) (defun audio-create-playlist(name)
"Create a new audio playlist for EMMS player. "Create a new audio playlist for EMMS player.