X-Git-Url: http://git.jankratochvil.net/?p=MyWeb.git;a=blobdiff_plain;f=Redirect.pm;h=871f65faf5d7bf0f79346bc01ede46ec1f256a8b;hp=0c0654ac7e91112fd73865e6956538d44923b9db;hb=a6cafbdedd009c8dfce91ba9d390fbce72df2595;hpb=f9da4afb617190969832c76df4a2642d9ad7accf

diff --git a/Redirect.pm b/Redirect.pm
index 0c0654a..871f65f 100644
--- a/Redirect.pm
+++ b/Redirect.pm
@@ -27,7 +27,9 @@ use My::Web;
 use Apache2::Const qw(HTTP_MOVED_PERMANENTLY);
 
 
-our $HTML_TEST=0;
+our $HTML_TEST="download";
+our $HTML_TEST_RC=HTTP_MOVED_PERMANENTLY;
+our $HTML_TEST_QUERY_STRING="location=http://localhost/";
 
 sub handler
 {
@@ -37,6 +39,5 @@ my $W=My::Web->init(
 				},
 		);
 My::Web->http_moved($W->{"args"}{"location"},HTTP_MOVED_PERMANENTLY);
-die "NOTREACHED";
 }
 1;