Return to lonmenu.pm CVS log | Up to [LON-CAPA] / loncom / interface |
version 1.85, 2003/08/18 18:16:24 | version 1.86, 2003/08/28 16:43:12 |
---|---|
Line 377 $form | Line 377 $form |
ENDREGTEXT | ENDREGTEXT |
# Registered, graphical output | # Registered, graphical output |
} else { | } else { |
my $requri=&Apache::lonnet::unescape($ENV{'REQUEST_URI'}); | my $requri=(split(/\?/,$ENV{'REQUEST_URI'}))[0]; |
$requri=&Apache::lonnet::unescape($requri); | |
$result = (<<ENDREGTHIS); | $result = (<<ENDREGTHIS); |
<script language="JavaScript"> | <script language="JavaScript"> |