From fe9e94513ab0d57f182a6922957ea14c773b4fae Mon Sep 17 00:00:00 2001 From: Simon McVittie Date: Sun, 5 Oct 2014 15:48:13 +0100 Subject: [PATCH] Fix a test-case that actually just repeated the previous one instead --- t/relativity.t | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/t/relativity.t b/t/relativity.t index 0f7d014c5..eb6cc448a 100755 --- a/t/relativity.t +++ b/t/relativity.t @@ -243,12 +243,12 @@ run(["./t/tmp/ikiwiki.cgi"], \$in, \$content, init => sub { $ENV{SERVER_PORT} = '80'; $ENV{SCRIPT_NAME} = '/ikiwiki.cgi'; $ENV{HTTP_HOST} = 'staging.example.net'; - $ENV{HTTPS} = 'on'; $ENV{CONTENT_LENGTH} = length $in; }); -like($bits{basehref}, qr{^http://static.example.com/$}); -like($bits{stylehref}, qr{^(?:(?:http:)?//static.example.com)?/style.css$}); -like($bits{tophref}, qr{^(?:http:)?//static.example.com/$}); +%bits = parse_cgi_content($content); +like($bits{basehref}, qr{^http://static.example.com/a/b/c/$}); +like($bits{stylehref}, qr{^(?:(?:http:)?//static.example.com|\.\./\.\./\.\.)/style.css$}); +like($bits{tophref}, qr{^(?:(?:http:)?//static.example.com|\.\./\.\./\.\.)/$}); TODO: { local $TODO = "use self-referential CGI URL?"; like($bits{cgihref}, qr{^(?:(?:http:)?//staging.example.net)?/ikiwiki.cgi$}); -- 2.39.5