summaryrefslogtreecommitdiff
path: root/.emacs.d/init.el
diff options
context:
space:
mode:
Diffstat (limited to '.emacs.d/init.el')
-rw-r--r--.emacs.d/init.el12
1 files changed, 12 insertions, 0 deletions
diff --git a/.emacs.d/init.el b/.emacs.d/init.el
index 1245ab74..dff8e16e 100644
--- a/.emacs.d/init.el
+++ b/.emacs.d/init.el
@@ -1737,6 +1737,17 @@ Lightweight alternative to pandoc-mode."
(buffer-file-name) "-o" output-file)
(find-file output-file))))
+(defun spw/play-internet-radio (stream)
+ "Open an Internet radio stream STREAM in VLC."
+ (call-process "C:\\Program Files\\VideoLAN\\VLC\\vlc.exe"
+ nil 0 nil
+ "--qt-start-minimized" stream))
+
+(defun spw/bassdrive ()
+ "Start playing the Bassdrive.com Internet radio stream."
+ (interactive)
+ (spw/play-internet-radio "C:\\Users\\swhitton\\Music\\Streams\\BassDrive.asx"))
+
;;;; ---- personal settings ----
@@ -1834,6 +1845,7 @@ BINDEE may be a command or another keymap, but whatever it is, it should not be
(projectile-persp-switch-project "~/src/dotfiles")
(find-file "~/src/dotfiles/.emacs.d/init.el")
(eval-buffer)))
+ ("g R" . spw/bassdrive)
("g t l" . world-time-list)
("g t h" . helm-world-time)