docs: lowercase all artists in artist examples.

This commit is contained in:
redxef 2025-02-24 23:04:13 +01:00
parent 80803cd048
commit 4db98eb1c8
Signed by: redxef
GPG key ID: 7DAC3AA211CBD921

View file

@ -26,19 +26,19 @@
(is-genre "swing" g))) (is-genre "swing" g)))
``` ```
- `All of Seeed`: A playlist containing all items by artist `Seeed`, - `All of Haller`: A playlist containing all items by artist `Haller`,
useless, since you also can just navigate to the artist to play all useless, since you also can just navigate to the artist to play all
their songs, but a good example. their songs, but a good example.
``` ```
Id: Seeed Id: Haller
Name: Seeed Name: Haller
Program: | Program: |
(let (let
(parent (parent
(invoke-generic *item* "FindParent" nil (list "MediaBrowser.Controller.Entities.Audio.MusicArtist, MediaBrowser.Controller"))) (invoke-generic *item* "FindParent" nil (list "MediaBrowser.Controller.Entities.Audio.MusicArtist, MediaBrowser.Controller")))
(cond (cond
((null parent) nil) ((null parent) nil)
(t (string= (car (getitems parent "Name")) "Haller")))) (t (string= (lower (car (getitems parent "Name"))) (lower "Haller")))))
``` ```
or simplified with definitions contained in the preamble: or simplified with definitions contained in the preamble:
``` ```
@ -91,7 +91,7 @@
(lambda (lambda
(i) (i)
;; the `(and (find-artist)` is here to prevent null violations. ;; the `(and (find-artist)` is here to prevent null violations.
(and (find-artist) (string= i (lower (get-name (find-artist)))))) (and (find-artist) (string= (lower i) (lower (get-name (find-artist))))))
*include-artists*))) *include-artists*)))
SortProgram: (begin (shuf *items*)) SortProgram: (begin (shuf *items*))
Filename: /config/data/smartplaylists/German.yaml Filename: /config/data/smartplaylists/German.yaml