adding some tweaks to a lot of things

This commit is contained in:
Chris Cochrun 2025-01-08 09:50:39 -06:00
parent fdb4c2ecc8
commit 0394d80a50
5 changed files with 320 additions and 33 deletions

View file

@ -186,3 +186,19 @@
(cdr (elt (elt (elt (lumina-get-lyrics-genius "Death Was Arrested") 0) 3) 7))
(lumina-get-lyrics-genius "Death Was Arrested")
(let* ((library (alist-get
'Items
(plz 'get "https://jelly.cochrun.xyz/Library/MediaFolders?userId=85f0e0fb6f88441d980bd7c4d4b3919c"
:headers '(("Authorization" .
"MediaBrowser Token=9fc4e879d50549169907c302dbe8d4f2")) :as #'json-read)))
(chris-shows (nth 0 (seq-filter
(lambda (elt)
(string=
(alist-get 'Name elt)
"Chris Shows"))
library))))
(print chris-shows)
(cl-loop for item in chris-shows
do (print item)))