From 8a9ccabda0f5594fdb70319169c719a49795faa9 Mon Sep 17 00:00:00 2001 From: Gerard Vermeulen Date: Mon, 18 Apr 2022 06:27:24 +0200 Subject: [PATCH] Tweak emms setup with new etc/emms/streams.emms file --- README.org | 38 +++++++++++++++++++++--------- etc/emms/streams.emms | 55 +++++++++++++++++++++++++++++++++++++++++++ 2 files changed, 82 insertions(+), 11 deletions(-) create mode 100644 etc/emms/streams.emms diff --git a/README.org b/README.org index 2fb2385..32472d8 100644 --- a/README.org +++ b/README.org @@ -3582,22 +3582,38 @@ initializes a list of =webjump-sites=. #+caption: Enable =emms=. #+name: lst:enable-emms #+begin_src emacs-lisp - (custom-set-variables - '(emms-mode-line-format "") - '(emms-player-list '(emms-player-mpd emms-player-mpv)) - `(emms-player-mpd-music-directory ,(expand-file-name "~/Music")) - '(emms-player-mpd-server-name "localhost") - '(emms-player-mpd-server-port "6600") - '(emms-player-mpd-verbose t) - '(emms-playing-time-display-format " %s ") - '(emms-playlist-mode-center-when-go t)) - (with-eval-after-load 'elfeed-show (when (require 'emms-setup nil 'noerror) (emms-all))) + (with-eval-after-load 'emms + (custom-set-variables + '(emms-player-list '(emms-player-mpd emms-player-mpv)))) + + (with-eval-after-load 'emms-mode-line + (custom-set-variables + '(emms-mode-line-format ""))) + + (with-eval-after-load 'emms-player-mpd + (custom-set-variables + `(emms-player-mpd-music-directory ,(expand-file-name "~/Music")) + '(emms-player-mpd-server-name "localhost") + '(emms-player-mpd-server-port "6600") + '(emms-player-mpd-verbose nil))) + + (with-eval-after-load 'emms-playing-time + (custom-set-variables + '(emms-playing-time-display-format " %s "))) + + (with-eval-after-load 'emms-playlist-mode + (custom-set-variables + '(emms-playlist-mode-center-when-go t))) + (autoload 'emms-streams "emms-streams" nil 'interactive) - (with-eval-after-load 'emms-streams (emms-all)) + (with-eval-after-load 'emms-streams + (custom-set-variables + `(emms-streams-file ,(no-littering-expand-etc-file-name "emms/streams.emms"))) + (emms-all)) #+end_src * [[info:emacs#Init File][Init File (info)]] footer diff --git a/etc/emms/streams.emms b/etc/emms/streams.emms new file mode 100644 index 0000000..7216671 --- /dev/null +++ b/etc/emms/streams.emms @@ -0,0 +1,55 @@ +;;; This is an EMMS playlist file: -*- emacs-lisp -*- +;; This includes the built-in list of streams which come with Emms by +;; default. Emms has no affiliation of any kind with the streaming +;; audio stations listed below, nor is this an endorsement of these +;; stations. Instead, this is a collection of stations submitted to +;; the project over the years by people who enjoy Emms. We hope you +;; will enjoy them too. +;; +;; I have found my streams on the following sites: +;; https://www.hendrikjansen.nl/henk/streaming.html +;; https://mediamagazine.nl/live-links-nederland/livestreams-nederland-landelijk/ +;; https://doc.ubuntu-fr.org/liste_radio_france +;; https://www.classicfm.fr/ +;; https://stream.p-node.org/ + +( + ;; My dutch streams: + (*track* (type . streamlist) (name . "http://icecast.omroep.nl/3fm-bb-mp3.m3u") (metadata "NPO Radio 3FM" "http://icecast.omroep.nl/3fm-bb-mp3.m3u" 1 streamlist)) + (*track* (type . streamlist) (name . "http://icecast.omroep.nl/radio1-bb-mp3.m3u") (metadata "NPO Radio 1" "http://icecast.omroep.nl/radio1-bb-mp3.m3u" 1 streamlist)) + (*track* (type . streamlist) (name . "http://icecast.omroep.nl/radio2-bb-mp3.m3u") (metadata "NPO Radio 2" "http://icecast.omroep.nl/radio2-bb-mp3.m3u" 1 streamlist)) + (*track* (type . streamlist) (name . "http://icecast.omroep.nl/radio4-bb-mp3.m3u") (metadata "NPO Radio 4" "http://icecast.omroep.nl/radio4-bb-mp3.m3u" 1 streamlist)) + ;; My french urls: + (*track* (type . url) (name . "http://icecast.radiofrance.fr/fbisere-midfi.mp3") (metadata "Radio France Bleue Isère" "http://icecast.radiofrance.fr/fbisere-midfi.mp3" 1 url)) + (*track* (type . url) (name . "http://icecast.radiofrance.fr/fip-midfi.mp3") (metadata "Radio France FIP National" "http://icecast.radiofrance.fr/fip-midfi.mp3" 1 url)) + (*track* (type . url) (name . "http://icecast.radiofrance.fr/fipworld-midfi.mp3") (metadata "Radio France FIP Monde" "http://icecast.radiofrance.fr/fipworld-midfi.mp3" 1 url)) + (*track* (type . url) (name . "http://icecast.radiofrance.fr/franceculture-midfi.mp3") (metadata "Radio France Culture" "http://icecast.radiofrance.fr/franceculture-midfi.mp3" 1 url)) + (*track* (type . url) (name . "http://icecast.radiofrance.fr/franceinfo-midfi.mp3") (metadata "Radio France Info" "http://icecast.radiofrance.fr/franceinfo-midfi.mp3" 1 url)) + (*track* (type . url) (name . "http://icecast.radiofrance.fr/franceinter-midfi.mp3") (metadata "Radio France Inter" "http://icecast.radiofrance.fr/franceinter-midfi.mp3" 1 url)) + (*track* (type . url) (name . "http://icecast.radiofrance.fr/francemusique-midfi.mp3") (metadata "Radio France Musique" "http://icecast.radiofrance.fr/francemusique-midfi.mp3" 1 url)) + ;; My french stream lists: + (*track* (type . streamlist) (name . "http://live.francra.org:8000/radiocanut.m3u") (metadata "Radio Canut" "http://live.francra.org:8000/radiocanut.m3u" 1 streamlist)) + (*track* (type . streamlist) (name . "http://media.radio-libertaire.org:8080/radiolib.mp3.m3u") (metadata "Radio Libertaire" "http://media.radio-libertaire.org:8080/radiolib.mp3.m3u" 1 streamlist)) + (*track* (type . streamlist) (name . "http://radio.toile-libre.org:8000/fpp.mp3.m3u") (metadata "Radio Fréquence Paris Plurielle" "http://radio.toile-libre.org:8000/fpp.mp3.m3u" 1 streamlist)) + ;; My swiss urls: + (*track* (type . url) (name . "https://classicfm.ice.infomaniak.ch/classic-fm.mp3") (metadata "Radio Classic FM" "https://classicfm.ice.infomaniak.ch/classic-fm.mp3" 1 url)) + ;; Orignal EMMS list: + (*track* (type . streamlist) (name . "http://www.somafm.com/beatblender.pls") (metadata "SomaFM: Beatblender" "http://www.somafm.com/beatblender.pls" 1 streamlist)) + (*track* (type . streamlist) (name . "http://www.somafm.com/secretagent.pls") (metadata "SomaFM: Secret Agent" "http://www.somafm.com/secretagent.pls" 1 streamlist)) + (*track* (type . streamlist) (name . "http://www.somafm.com/groovesalad.pls") (metadata "SomaFM: Groove Salad" "http://www.somafm.com/groovesalad.pls" 1 streamlist)) + (*track* (type . streamlist) (name . "http://www.somafm.com/dronezone.pls") (metadata "SomaFM: Drone Zone" "http://www.somafm.com/dronezone.pls" 1 streamlist)) + (*track* (type . streamlist) (name . "http://www.somafm.com/tagstrance.pls") (metadata "SomaFM: Tag's Trance" "http://www.somafm.com/tagstrance.pls" 1 streamlist)) + (*track* (type . streamlist) (name . "http://www.somafm.com/indiepop.pls") (metadata "SomaFM: Indie Pop Rocks" "http://www.somafm.com/indiepop.pls" 1 streamlist)) + (*track* (type . url) (name . "http://listen.radionomy.com:80/-PHILOSOMATIKAPROGRESSIVE-") (metadata "P H I L O S O M A T I K A - Progressive Psytrance" "http://listen.radionomy.com:80/-PHILOSOMATIKAPROGRESSIVE-" 1 url)) + ;; (*track* (type . streamlist) (name . "http://www.bassdrive.com/BassDrive.m3u") (metadata "Drum and Bass Radio, BassDrive" "http://www.bassdrive.com/BassDrive.m3u" 1 streamlist)) + ;; (*track* (type . streamlist) (name . "http://www.ibiblio.org/wcpe/wcpe.pls") (metadata "WCPE, Classical Music" "http://www.ibiblio.org/wcpe/wcpe.pls" 1 streamlist)) + ;; (*track* (type . streamlist) (name . "http://stream.nute.net/kohina/stream.ogg.m3u") (metadata "Kohina - Old school game and demo music" "http://stream.nute.net/kohina/stream.ogg.m3u" 1 streamlist)) + ;; (*track* (type . streamlist) (name . "http://privat.is-by.us:8000/necta192.mp3.m3u") (metadata "Nectarine, Demoscene Radio, DE Continuum's relay 192 mp3" "http://privat.is-by.us:8000/necta192.mp3.m3u" 1 streamlist)) + ;; (*track* (type . streamlist) (name . "http://nectarine.from-de.com/necta192.m3u") (metadata "Nectarine, Demoscene Radio, DE stream (High Bitrate)" "http://nectarine.from-de.com/necta192.m3u" 1 streamlist)) + ;; (*track* (type . streamlist) (name . "http://www.wfmu.org/wfmu.pls") (metadata "WFMU, Freeform radio" "http://www.wfmu.org/wfmu.pls" 1 streamlist)) + ;; (*track* (type . streamlist) (name . "http://wfmu.org/wfmu_rock.pls") (metadata "WFMU, Rock'n'Soul Ichiban!" "http://www.wfmu.org/wfmu.pls" 1 streamlist)) + ;; (*track* (type . streamlist) (name . "http://wfmu.org/wfmu_drummer.pls") (metadata "WFMU, Give the Drummer Radio" "http://www.wfmu.org/wfmu.pls" 1 streamlist)) + ;; (*track* (type . streamlist) (name . "http://wfmu.org/wfmu_sheena.pls") (metadata "WFMU, Sheena's Jungle Room" "http://www.wfmu.org/wfmu.pls" 1 streamlist)) + ;; (*track* (type . streamlist) (name . "http://nyc01.egihosting.com:6232/listen.pls") (metadata "WBCR-LP - Berkshire Community Radio" "http://nyc01.egihosting.com:6232/listen.pls" 1 streamlist)) + (*track* (type . streamlist) (name . "http://199.244.85.125:8000/wxhq1") (metadata "WXHQ-LP - Newport Radio" "http://199.244.85.125:8000/wxhq1" 1 streamlist)) + )