remove unused and non working code

This commit is contained in:
2023-07-22 19:34:29 +02:00
parent 8d31a1720b
commit aa07319b28

View File

@@ -104,20 +104,6 @@ the user declines to add another file."
(emms-playlist-save 'native filename)
(emms-playlist-mode))))))))
(defun tvd-emms-follow-playing-song()
(interactive)
(emms-playlist-mode-center-current))
;; (let ((track (emms-track-get (emms-playlist-current-selected-track) 'name)))
;; (message (format "track name: %s" track)))
;; (message (format "%s" emms-playlist-selected-marker))
;; (save-restriction
;; (when emms-playlist-selected-marker
;; (goto-char emms-playlist-selected-marker))))
;; we need to apply this hook automatically because use-package's
;; :hook keyword doesn't supporting appending a hook
(add-hook 'emms-playlist-selection-changed-hook 'tvd-emms-follow-playing-song 1)
:hook
(emms-playlist-mode . hl-line-mode)
(emms-playlist-source-inserted . beginning-of-buffer)
@@ -126,7 +112,6 @@ the user declines to add another file."
( "<right>" . 'emms-seek-forward)
( "<left>" . 'emms-seek-backward)
( "<SPC>" . 'emms-pause)
;; ( "c" . 'emms-playlist-set-playlist-buffer) default: 'emms-playlist-mode-center-current
( "b" . 'tvd-emms-beginning-of-song)
( "r" . 'emms-toggle-repeat-track)
( "R" . 'emms-toggle-repeat-playlist)))