X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=t%2Fmusicexpo-cache.t;h=81016c54d7d4f621bc1b4ac8300271e94c265760;hb=a535e8790ef7f825c6049e16dff723d9e9b54634;hp=3fc3e1380f5b1dfdc4cb829ef88837de0ceb4b4d;hpb=6b125df708afbc2200f039cb6a0e5af3e87e2468;p=app-musicexpo.git

diff --git a/t/musicexpo-cache.t b/t/musicexpo-cache.t
index 3fc3e13..81016c5 100644
--- a/t/musicexpo-cache.t
+++ b/t/musicexpo-cache.t
@@ -5,14 +5,12 @@ use warnings;
 use Test::More tests => 3;
 
 use File::Temp qw/tempfile/;
-use DB_File;
-use Storable qw/thaw/;
 
 my $file;
 
 BEGIN {
   $file = (tempfile UNLINK => 1)[1];
-  @ARGV = (-cache => $file, 'empty.flac', 'empty.mp3');
+  @ARGV = (-cache => $file, sort <empty*>);
 }
 BEGIN { use_ok('App::MusicExpo'); }
 
@@ -35,9 +33,10 @@ is $out, <<'OUT', 'output is correct';
 <thead>
 <tr><th>Title<th>Artist<th>Album<th>Genre<th>Track<th>Year<th>Type
 <tbody>
-<tr><td class="title">Cellule<td class="artist">Silence<td class="album">L&#39;autre endroit<td class="genre">Electro<td class="track">01/09<td class="year">2005<td class="formats"><a href="/music/empty.flac">FLAC</a> <a href="/music/empty.mp3">MP3</a> 
+<tr><td class="title"><a href="#silence-cellule" data-hash="#silence-cellule">Cellule</a><td class="artist">Silence<td class="album">L&#39;autre endroit<td class="genre">Electro<td class="track">01/09<td class="year">2005<td class="formats"><a href="/music/empty.flac">FLAC</a> <a href="/music/empty.ogg">Vorbis</a> 
+<tr><td class="title"><a href="#silence-cellule" data-hash="#silence-cellule">Cellule</a><td class="artist">Silence<td class="album">L&#39;autre endroit<td class="genre">Electro<td class="track">01/09<td class="year">2005<td class="formats"><a href="/music/empty3.mp3">MP3</a> 
+<tr><td class="title"><a href="#silence-cellule" data-hash="#silence-cellule">Cellule</a><td class="artist">Silence<td class="album">L&#39;autre endroit<td class="genre">Electro<td class="track">1/9<td class="year">2005<td class="formats"><a href="/music/empty4.aac">AAC</a> 
 </table>
 OUT
 
 ok -e $file, 'cache exists';
-tie my %db, DB_File => $file;