diff --git a/arch.scm b/arch.scm index 5b3f9a6..9766ef9 100644 --- a/arch.scm +++ b/arch.scm @@ -48,11 +48,22 @@ "pavucontrol" )) +(define %arch-misc + (list + "hy" + "python-requests" + + "mpv" + )) + (define arch-packages (append %arch-base-packages (if (not (equal? "lighthouse" (getlogin))) - %arch-de-things + (begin + %arch-de-things + %arch-misc + ) '()))) (define arch-services diff --git a/files/bin/chill-player b/files/bin/chill-player new file mode 100755 index 0000000..486df46 --- /dev/null +++ b/files/bin/chill-player @@ -0,0 +1,10 @@ +#!/usr/bin/env hy + +(import json) +(import requests) +(import subprocess) + +(while True + (for [item (.json (requests.get "https://stream.chillhop.com/live/12355"))] + (print f"Now playing: {(:title item)} - {(:artists item)} - {(:fileId item)}") + (subprocess.run f"mpv https://stream.chillhop.com/mp3/{(:fileId item)}" :shell True :capture_output True))) diff --git a/files/zshrc b/files/zshrc index d63ca1c..b6bdac0 100644 --- a/files/zshrc +++ b/files/zshrc @@ -69,6 +69,7 @@ ZSH_THEME="fox" export LANG=en_US.UTF-8 export LC_ALL=en_US.UTF-8 +export PATH="$HOME/.local/bin:$PATH" . $HOME/.guix-home/setup-environment diff --git a/home-configuration.scm b/home-configuration.scm index e06381b..b044a7d 100644 --- a/home-configuration.scm +++ b/home-configuration.scm @@ -54,7 +54,10 @@ (service home-files-service-type `((".config/hypr/hyprland.conf" ,(local-file "files/hyprland.conf")) (".config/hypr/hyprlock.conf" ,(local-file "files/hyprlock.conf")) - (".config/hypr/hyprpaper.conf" ,(local-file "files/hyprpaper.conf")))) + (".config/hypr/hyprpaper.conf" ,(local-file "files/hyprpaper.conf")) + ;; bin + (".local/bin" ,(local-file "files/bin" #:recursive? #t)) + )) (service home-zsh-service-type (home-zsh-configuration (zshrc (list (local-file "files/zshrc"))))))))