Encourage people to use the secure server.

git-svn-id: svn://10.0.0.236/trunk@9365 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
terry%netscape.com 1998-09-04 19:23:40 +00:00
parent 1d8ede9301
commit f9cd004867

View File

@ -50,6 +50,13 @@ print start_html(-Title=>"Despot -- configure mozilla users$extra",
if (!param()) {
print h1("Despot -- access control for mozilla.org.");
if ($ENV{"HTTPS"} ne "ON") {
my $fixedurl = $ENV{"SERVER_URL"} . $ENV{"SCRIPT_NAME"};
$fixedurl =~ s/^http:/https:/;
print b("<font color=red>If possible, please use the secure version " .
"of this form, by " . a({href=>$fixedurl}, "clicking here") .
".</font>");
}
print h2("Login, please.");
print img({-align=>"right",-width=>72,-height=>84,-src=>"handcuff.gif"});
print p("To manage mozilla users, or to change your mozilla.org " .