X-Git-Url: http://git.jankratochvil.net/?p=MyWeb.git;a=blobdiff_plain;f=HaveJS.pm;h=a1ac2fab27c908460e32a0b7e02ead5e32d37692;hp=36229e0a10d9c3ca0ea19a6fcbff735a5b1d259d;hb=244f6d722e559c43575ed6e5c1a9c8dbc1814f59;hpb=78715c32e9d5fabc3a853f8b210a953bb315b6ee diff --git a/HaveJS.pm b/HaveJS.pm index 36229e0..a1ac2fa 100644 --- a/HaveJS.pm +++ b/HaveJS.pm @@ -26,15 +26,19 @@ use warnings; use My::Web; -our $HTML_TEST=0; +our $HTML_TEST="download"; sub handler { my $W=My::Web->init( "header_only"=>1, + # Do not: text/javascript + # as it does not look as registered, at least according to: MIME::Types $VERSION 1.15 + # "application/javascript" so far standardized till 2005-12-08 by: + # http://www.ietf.org/internet-drafts/draft-hoehrmann-script-types-03.txt + "content_type"=>"application/javascript", ); My::Web->heading(); -$W->{"r"}->content_type("text/javascript"); # Prevent redirection of some top (referring) foreign webpage as it