From 17e3ebfc4ca25abdfb327b02cb491682a4a7445b Mon Sep 17 00:00:00 2001 From: "terry%mozilla.org" <> Date: Tue, 24 Aug 1999 22:24:49 +0000 Subject: Patch suggested by dbaron@fas.harvard.edu -- kick the javascript on loading, in case the default query has some relevant fields set. --- CGI.pl | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) (limited to 'CGI.pl') diff --git a/CGI.pl b/CGI.pl index a0a64fdad..4555ea856 100644 --- a/CGI.pl +++ b/CGI.pl @@ -481,7 +481,7 @@ name=PleaseMailAPassword> sub PutHeader { - my ($title, $h1, $h2) = (@_); + my ($title, $h1, $h2, $extra) = (@_); if (!defined $h1) { $h1 = $title; @@ -489,11 +489,14 @@ sub PutHeader { if (!defined $h2) { $h2 = ""; } + if (!defined $extra) { + $extra = ""; + } print "\n$title\n"; print Param("headerhtml") . "\n\n"; print "\n"; + print "LINK=\"#0000EE\" VLINK=\"#551A8B\" ALINK=\"#FF0000\" $extra>\n"; print PerformSubsts(Param("bannerhtml"), undef); -- cgit v1.2.3-24-g4f1b