diff options
-rw-r--r-- | downloader.lisp | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/downloader.lisp b/downloader.lisp index 3142277..9f9a3a5 100644 --- a/downloader.lisp +++ b/downloader.lisp @@ -39,6 +39,7 @@ a file and whose CDR is a PLIST of attributes to pass to (make-instance 'track ...)" (with-plist ((title :|title|) + (track-title :|track|) (album :|album|) (codec :|acodec|) (artist :|artist|) @@ -49,7 +50,7 @@ (with-plist ((url :|url|)) (first thumbs) (list :source source - :title title + :title (or track-title title) :album album :codec codec :artist artist |