add emms for media

.gitignore

@@ -8,3 +8,6 @@
 /recentf
 /.cache/
 /rime/
+/emms/
+/games/
+/tramp

.gitmodules

@@ -178,3 +178,6 @@
 [submodule "site-lisp/emacs-websocket"]
 	path = site-lisp/emacs-websocket
 	url = https://github.com/ahyatt/emacs-websocket.git
+[submodule "site-lisp/emms"]
+	path = site-lisp/emms
+	url = https://git.savannah.gnu.org/git/emms.git

init.el

@@ -131,6 +131,7 @@ If freezing sometimes, decrease it. If stuttering, increase it.")
 (require 'init-mail)
 (require 'init-ace-window)
 (require 'init-markdown)
+(require 'init-media)
 
 
 (setq custom-file (expand-file-name "custom.el" creature/cache-dir))

lisp/init-media.el

@@ -0,0 +1,18 @@
+;; -*- coding: utf-8; lexical-binding: t; -*-
+
+(autoload 'emms-all "emms-setup" "" t)
+(autoload 'emms-default-players "" t)
+
+(with-eval-after-load 'emms-lyrics
+  (setq emms-lyrics-dir "/home/zedhugh/.lyrics"))
+
+(with-eval-after-load 'emms-source-file
+  (setq emms-source-file-default-directory "/home/zedhugh/music"))
+
+(defun creature/emms-setup ()
+  (interactive)
+  (emms-all)
+  (emms-default-players))
+
+
+(provide 'init-media)