version 1.3, 2004/07/03 19:33:30
|
version 1.5, 2004/07/03 19:44:53
|
Line 69 sub handler {
|
Line 69 sub handler {
|
sub display_help_banner { |
sub display_help_banner { |
my ($r,$color,$function,$faq,$bug,$topic,$component_url,$origurl,$bugurl,$faqbaseurl,$requestmail) = @_; |
my ($r,$color,$function,$faq,$bug,$topic,$component_url,$origurl,$bugurl,$faqbaseurl,$requestmail) = @_; |
my $bodytag = &Apache::loncommon::bodytag('',$function,'rightmargin="0" leftmargin="0" marginwidth="0" topmargin="1" marginheight="1"',1); |
my $bodytag = &Apache::loncommon::bodytag('',$function,'rightmargin="0" leftmargin="0" marginwidth="0" topmargin="1" marginheight="1"',1); |
$bodytag=~/[\n\r]/ /g; |
$bodytag=~s/[\n\r]/ /g; |
my $fontcolor = &Apache::loncommon::designparm($function.'.font'); |
my $fontcolor = &Apache::loncommon::designparm($function.'.font'); |
my $alinkcolor = &Apache::loncommon::designparm($function.'.alink'); |
my $alinkcolor = &Apache::loncommon::designparm($function.'.alink'); |
my $vlinkcolor = &Apache::loncommon::designparm($function.'.vlink'); |
my $vlinkcolor = &Apache::loncommon::designparm($function.'.vlink'); |
Line 167 END
|
Line 167 END
|
sub display_help_mainpage { |
sub display_help_mainpage { |
my ($r,$color,$function,$faq,$bug,$topic,$component_url,$origurl,$bugurl,$faqbaseurl,$requestmail) = @_; |
my ($r,$color,$function,$faq,$bug,$topic,$component_url,$origurl,$bugurl,$faqbaseurl,$requestmail) = @_; |
my $bodytag = &Apache::loncommon::bodytag('',$function,'topmargin="0" marginheight="0"',1); |
my $bodytag = &Apache::loncommon::bodytag('',$function,'topmargin="0" marginheight="0"',1); |
$bodytag=~/[\n\r]/ /g; |
$bodytag=~s/[\n\r]/ /g; |
$r->print(<<END); |
$r->print(<<END); |
<html> |
<html> |
<head> |
<head> |