version 1.194, 2004/07/03 18:55:16
|
version 1.195, 2004/07/03 19:12:41
|
Line 651 sub help_open_menu {
|
Line 651 sub help_open_menu {
|
my $title = &mt('Choose your help'); |
my $title = &mt('Choose your help'); |
my $origurl = $ENV{'REQUEST_URI'}; |
my $origurl = $ENV{'REQUEST_URI'}; |
my $timestamp = time; |
my $timestamp = time; |
# if ($ENV{'request.course.fn'}) { |
|
# open(FILE,">$ENV{'request.course.fn'}.formdata"); |
|
# &get_unprocessed_cgi($ENV{'QUERY_STRING'},undef); |
|
# foreach (keys %ENV) { |
|
# if ($_ =~ m/^form\.(.+)$/) { |
|
# if (ref($ENV{$_}) eq 'ARRAY') { |
|
# my $valstr = join(",",@{$ENV{$_}}); |
|
# print FILE "$1 = $valstr\n"; |
|
# } else { |
|
# print FILE "$1 = $ENV{$_}\n"; |
|
# } |
|
# } |
|
# } |
|
# close(FILE); |
|
# } |
|
foreach (\$color,\$function,\$topic,\$component_help,\$faq,\$bug,\$origurl) { |
foreach (\$color,\$function,\$topic,\$component_help,\$faq,\$bug,\$origurl) { |
$$_ = &Apache::lonnet::escape($$_); |
$$_ = &Apache::lonnet::escape($$_); |
} |
} |
|
|
if (!$stayOnPage) |
if (!$stayOnPage) { |
{ |
|
$link = "javascript:helpMenu('open')"; |
$link = "javascript:helpMenu('open')"; |
} |
} else { |
else |
|
{ |
|
$link = "javascript:helpMenu('display')"; |
$link = "javascript:helpMenu('display')"; |
} |
} |
my $banner_link = "/adm/helpmenu?page=banner&color=$color&function=$function&topic=$topic&component_help=$component_help&faq=$faq&bug=$bug&origurl=$origurl&stamp=$timestamp"; |
my $banner_link = "/adm/helpmenu?page=banner&color=$color&function=$function&topic=$topic&component_help=$component_help&faq=$faq&bug=$bug&origurl=$origurl&stamp=$timestamp"; |