ja
This commit is contained in:
@@ -12,6 +12,11 @@
|
||||
#:protocol-info
|
||||
"http-get:*:audio/flac:DLNA.ORG_OP=01;DLNA.ORG_CI=0"
|
||||
#:title "Rock & Roll <live>"
|
||||
#:artist "Test Artist"
|
||||
#:album "Test Album"
|
||||
#:genre "Alternative"
|
||||
#:year 2026
|
||||
#:track 7
|
||||
#:duration 639.9
|
||||
#:size 50357462))
|
||||
|
||||
@@ -31,6 +36,11 @@
|
||||
"Rock & Roll <live>")
|
||||
(check-equal? (xexpr-child-text item "class")
|
||||
"object.item.audioItem.musicTrack")
|
||||
(check-equal? (xexpr-child-text item "artist") "Test Artist")
|
||||
(check-equal? (xexpr-child-text item "album") "Test Album")
|
||||
(check-equal? (xexpr-child-text item "genre") "Alternative")
|
||||
(check-equal? (xexpr-child-text item "date") "2026")
|
||||
(check-equal? (xexpr-child-text item "originalTrackNumber") "7")
|
||||
(check-equal? (xexpr-text resource)
|
||||
"http://example.test/audio?a=1&b=2")
|
||||
(check-equal? (xexpr-attribute resource 'protocolInfo)
|
||||
|
||||
Reference in New Issue
Block a user