added emms

This commit is contained in:
2023-06-06 16:16:09 +02:00
parent 44ab2e1810
commit 19552483ac
3 changed files with 32 additions and 1 deletions

View File

@@ -11,7 +11,7 @@
'("7f1d414afda803f3244c6fb4c2c64bea44dac040ed3731ec9d75275b9e831fe5" default))
'(magit-todos-insert-after '(bottom) nil nil "Changed by setter of obsolete option `magit-todos-insert-at'")
'(package-selected-packages
'(package-lint blamer howm tiny tramp dictcc beacon which-key goto-last-change browse-kill-ring fringe-current-line swiper smex undo-tree fic-mode cmake-mode yaml-mode windresize web-mode use-package tablist solarized-theme smartparens rust-mode projectile persistent-scratch org-bullets markdown-mode magit iedit ibuffer-vc ibuffer-tramp hydra htmlize highlight-indentation go-mode eyebrowse elmacro dumb-jump dired-ranger dired-k dired-filter default-text-scale change-inner buffer-move))
'(emms package-lint blamer howm tiny tramp dictcc beacon which-key goto-last-change browse-kill-ring fringe-current-line swiper smex undo-tree fic-mode cmake-mode yaml-mode windresize web-mode use-package tablist solarized-theme smartparens rust-mode projectile persistent-scratch org-bullets markdown-mode magit iedit ibuffer-vc ibuffer-tramp hydra htmlize highlight-indentation go-mode eyebrowse elmacro dumb-jump dired-ranger dired-k dired-filter default-text-scale change-inner buffer-move))
'(safe-local-variable-values '((ruby-indent-level 4)))
'(warning-suppress-types '((comp))))
(custom-set-faces

View File

@@ -147,6 +147,7 @@
(require 'init-ediff)
(require 'init-projectile)
(require 'init-occur)
(require 'init-audio)
;; emacs configuration
(require 'init-windowmgmt)

30
lisp/init-audio.el Normal file
View File

@@ -0,0 +1,30 @@
(use-package emms
:defer nil
:config
(setq emms-source-file-default-directory "~/MP3")
(emms-add-directory-tree "~/MP3/")
'(emms-player-mplayer-parameters (quote ("-slave" "-quiet" "-really-quiet" "-novideo")))
(require 'emms-player-simple)
(require 'emms-source-file)
(require 'emms-source-playlist)
(require 'emms-player-mplayer)
(emms-all)
(emms-default-players)
(defun tvd-emms-beginning-of-song
(interactive)
(emms-seek-to '00:00))
:bind (:map emms-playlist-mode-map
( "<right>" . 'emms-seek-forward)
( "<left>" . 'emms-seek-backward)
( "<SPC>" . 'emms-pause)
( "b" . 'tvd-emms-beginning-of-song)))
(defalias 'audio 'emms)
(provide 'init-audio)
;;; init-audio.el ends here