--- trunk/t/5-output-sorted.t	2007/10/31 12:17:09	937
+++ trunk/t/5-output-sorted.t	2007/10/31 12:17:11	938
@@ -1,6 +1,6 @@
 #!/usr/bin/perl -w
 
-use Test::More tests => 13;
+use Test::More tests => 16;
 use Test::Exception;
 use Cwd qw/abs_path/;
 use Data::Dump qw/dump/;
@@ -56,4 +56,6 @@
 
 ok( $out->finish, 'finish' );
 
-ok( -e "$path/test.txt", 'list' );
+foreach my $l ( qw/source id array foo/ ) {
+	ok( -e "$path/$l.txt", "list $l exists" );
+}