X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=test%2Fcddb%2Fcddb.flt;h=a643b21cae89a820ba4e9a6c6baed04b154f88c6;hb=e4c6861efeeea654bfb00c5f0239ee258629d77f;hp=c617cc9795eccf354e0728ef044092d80e40c128;hpb=09aca6953d7bd8ad544568b455a324d1bb9ba9a3;p=idzebra-moved-to-github.git diff --git a/test/cddb/cddb.flt b/test/cddb/cddb.flt index c617cc9..a643b21 100644 --- a/test/cddb/cddb.flt +++ b/test/cddb/cddb.flt @@ -1,10 +1,22 @@ BEGIN { begin record cddb } /^DISCID=/ BODY /$/ { data -element identifier $1 } /^DTITLE=/ BODY /$/ { data -element title $1 } -/^TTITLE[0-9]+=/ BODY /$/ { - begin element track - data -element title $1 - end element +/^EXTD=/ BODY /$/ { data -element ext $1 } +/^TTITLE/ /[0-9]+/ /=/ BODY /$/ { set trackstitle($1) $3 } +/^EXTT/ /[0-9]+/ /=/ BODY /$/ { set tracksext($1) $3 } +/^PLAYORDER/ { + foreach v [array names trackstitle] { + begin element track + data -element title $trackstitle($v) + if {[info exists tracksext($v)]} { + set d $tracksext($v) + if {[string length $d]} { + data -element ext $tracksext($v) + } } + end element + } + } +