X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Faggregate%2Flive_priorities.t;h=82437e3fa0600d74399d19f3b7861104653aa573;hb=4e93cdb6d9403718baff430bc1bdc3245aa5236f;hp=e415827ec051dec699fb314cf4f9316dfec38d00;hpb=9af4ee013b23e7241d4664ea39952fa3b20f4b7f;p=catagits%2FCatalyst-Runtime.git 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 } ) {