version 1.28, 2002/03/21 18:54:47
|
version 1.29, 2002/05/06 14:20:27
|
Line 164 sub success {
|
Line 164 sub success {
|
# -------------------------------------------------------- Menu script and info |
# -------------------------------------------------------- Menu script and info |
my $windowinfo=&Apache::lonmenu::open(); |
my $windowinfo=&Apache::lonmenu::open(); |
# ------------------------------------------------------------- Info for Remote |
# ------------------------------------------------------------- Info for Remote |
my $configmenu=&Apache::lonmenu::rawconfig(); |
my $configmenu=&Apache::lonmenu::rawconfig($r); |
# ------------------------------------------------- Output for successful login |
# ------------------------------------------------- Output for successful login |
|
|
$r->send_cgi_header(<<ENDHEADER); |
$r->send_cgi_header(<<ENDHEADER); |