Description: fix hash randomization issues
 a better solution would be to say 'sort keys %testmap', but that's not
 the order in use in $expected
Author: Florian Schlichting <fsfs@debian.org>
Forwarded: https://rt.cpan.org/Public/Bug/Display.html?id=94968

--- a/t/01parse.t
+++ b/t/01parse.t
@@ -30,7 +30,7 @@
 foreach my $type ( qw(day week month year) ) {
     my $got=$parser
     ->parse(type=>$type,start=>'2004-11-12',url=>'multical?',
-	    files=>[map {"t/calendars/$_"} keys %testmap]);
+	    files=>['t/calendars/event-duration.ics', 't/calendars/complex.ics', 't/calendars/all-day-event.ics']);
     $got=~s/today//g;
     $got=~s/ class=""//g;
     dump_html("$caldir/multical.$type.html",$got) if $ENV{_DUMP_TEST_HTML_};
@@ -44,7 +44,7 @@
 foreach my $type ( qw(day week month) ) {
     my $got=$parser
     ->parse(type=>$type,start=>'2004-11-12',
-	    files=>[map {"t/calendars/$_"} keys %testmap]);
+	    files=>['t/calendars/event-duration.ics', 't/calendars/complex.ics', 't/calendars/all-day-event.ics']);
     $got=~s/today//g;
     $got=~s/ class=""//g;
     dump_html("$caldir/multical.nolink.$type.html",$got) if $ENV{_DUMP_TEST_HTML_};