adding some tweaks to a lot of things
This commit is contained in:
parent
fdb4c2ecc8
commit
0394d80a50
5 changed files with 320 additions and 33 deletions
16
lumina.el
16
lumina.el
|
@ -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)))
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue