X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Faggregate%2Flive_priorities.t;h=82437e3fa0600d74399d19f3b7861104653aa573;hp=e415827ec051dec699fb314cf4f9316dfec38d00;hb=88e5a8b0c4d28e46b8ba6b6b9567063e57af9063;hpb=9868e0a0023cc8b598d60f150ea367e0056a65f3 diff --git a/t/aggregate/live_priorities.t b/t/aggregate/live_priorities.t index e415827..82437e3 100644 --- a/t/aggregate/live_priorities.t +++ b/t/aggregate/live_priorities.t @@ -32,14 +32,14 @@ while ( @tests ) { my $data = shift @tests; # Run tests for path with trailing slash and without - SKIP: for my $req_uri - ( + SKIP: for my $req_uri + ( join( '' => $uri_base, $data->{ path } ), # Without trailing path join( '' => $uri_base, $data->{ path }, '/' ), # With trailing path ) { my $end_slash = ( $req_uri =~ qr(/$) ? 1 : 0 ); - # use slash_expect argument if URI ends with slash + # use slash_expect argument if URI ends with slash # and the slash_expect argument is defined my $expect = $data->{ expect } || ''; if ( $end_slash and exists $data->{ slash_expect } ) {