ja
This commit is contained in:
@@ -269,6 +269,11 @@
|
||||
|
||||
(define (media-file-server-didl-lite server url
|
||||
#:title [title #f]
|
||||
#:artist [artist #f]
|
||||
#:album [album #f]
|
||||
#:genre [genre #f]
|
||||
#:year [year #f]
|
||||
#:track [track #f]
|
||||
#:duration [duration #f]
|
||||
#:id [id "0"]
|
||||
#:parent-id [parent-id "0"])
|
||||
@@ -312,6 +317,11 @@
|
||||
#:title
|
||||
(or title
|
||||
(path->string (file-name-from-path path)))
|
||||
#:artist artist
|
||||
#:album album
|
||||
#:genre genre
|
||||
#:year year
|
||||
#:track track
|
||||
#:duration duration
|
||||
#:size (file-size path)
|
||||
#:id id
|
||||
|
||||
Reference in New Issue
Block a user