version 1.14, 2004/11/08 22:47:43
|
version 1.16, 2004/12/04 21:15:33
|
Line 123 END
|
Line 123 END
|
$r->print(" |
$r->print(" |
<td align=\"center\"> <b><a href=\"$component_url\" target=\"bodyframe\">"); |
<td align=\"center\"> <b><a href=\"$component_url\" target=\"bodyframe\">"); |
} elsif ($ENV{'user.adv'}) { |
} elsif ($ENV{'user.adv'}) { |
$r->print('<td align="center"> <b><a href="$location/help/nohelptopic.html" target="bodyframe">'); |
$r->print('<td align="center"> <b><a href="/adm/help/nohelptopic.html" target="bodyframe">'); |
} |
} |
$r->print(' |
$r->print(' |
<img src="$location/help/gif/smallHelp.gif" border="0" alt="(Topic help)" valign="middle" /> Topic help</a></b> </td>'); |
<img src="'.$location.'/help/gif/smallHelp.gif" border="0" alt="(Topic help)" valign="middle" /> Topic help</a></b> </td>'); |
} |
} |
if ($requestmail =~ m/^[^\@]+\@[^\@]+$/) { |
if ($requestmail =~ m/^[^\@]+\@[^\@]+$/) { |
$r->print(' |
$r->print(' |
<td align="center"> <b><a href="/adm/support?origurl='.&Apache::lonnet::escape($origurl).'&function='.$function.'" target="bodyframe"><img src="$location/lonIcons/helpdesk.gif" border="0" alt="(Ask helpdesk)" valign="middle" /> Ask helpdesk</a></b> </td>'); |
<td align="center"> <b><a href="/adm/support?origurl='.&Apache::lonnet::escape($origurl).'&function='.$function.'" target="bodyframe"><img src="'.$location.'/lonIcons/helpdesk.gif" border="0" alt="(Ask helpdesk)" valign="middle" /> Ask helpdesk</a></b> </td>'); |
} |
} |
if ($faq && $ENV{'user.adv'}) { |
if ($faq && $ENV{'user.adv'}) { |
$r->print(<<END) |
$r->print(<<END); |
<td align="center"> |
<td align="center"> |
<b><a href="$faqbaseurl/fom/cache/$faq.html" target="bodyframe"><img src="$location/lonMisc/smallFAQ.gif" border="0" alt="(FAQ)" valign="middle" /> FAQ</a></b> |
<b><a href="$faqbaseurl/fom/cache/$faq.html" target="bodyframe"><img src="$location/lonMisc/smallFAQ.gif" border="0" alt="(FAQ)" valign="middle" /> FAQ</a></b> |
</td> |
</td> |
END |
END |
} |
} |
if ($ENV{'user.adv'}) { |
if ($ENV{'user.adv'}) { |
$r->print(<<END) |
$r->print(<<END); |
<td align="center"> <b><a href="$bugurl" target="bodyframe"><img src="$location/lonMisc/smallBug.gif" border="0" alt="(Report a bug)" valign="middle" /> Report a bug</a> </b></td> |
<td align="center"> <b><a href="$bugurl" target="bodyframe"><img src="$location/lonMisc/smallBug.gif" border="0" alt="(Report a bug)" valign="middle" /> Report a bug</a> </b></td> |
END |
END |
} |
} |