version 1.23, 2002/09/17 19:48:40
|
version 1.26, 2002/10/29 20:57:31
|
Line 56 sub handler {
|
Line 56 sub handler {
|
|
|
my $fullgraph=($ENV{'form.interface'} ne 'textual'); |
my $fullgraph=($ENV{'form.interface'} ne 'textual'); |
|
|
my $iconpath= $r->dir_config('lonIconsURL'); |
my $iconpath= 'http://'.$ENV{'HTTP_HOST'}.':8080'. |
|
$r->dir_config('lonIconsURL'); |
my $domain = $r->dir_config('lonDefDomain'); |
my $domain = $r->dir_config('lonDefDomain'); |
my $role = $r->dir_config('lonRole'); |
my $role = $r->dir_config('lonRole'); |
my $loadlim = $r->dir_config('lonLoadLim'); |
my $loadlim = $r->dir_config('lonLoadLim'); |
Line 77 sub handler {
|
Line 78 sub handler {
|
my $otherserver='http://'.$ENV{'SERVER_NAME'}; |
my $otherserver='http://'.$ENV{'SERVER_NAME'}; |
my $firsturl=$ENV{'request.firsturl'}; |
my $firsturl=$ENV{'request.firsturl'}; |
# ---------------------------------------- Are we access server and overloaded? |
# ---------------------------------------- Are we access server and overloaded? |
if (($role eq 'access') or ($loadpercent>100.0)) { |
if (($role eq 'access') && ($loadpercent>100.0)) { |
$otherserver=Apache::lonnet::spareserver($loadpercent); |
$otherserver=Apache::lonnet::spareserver($loadpercent); |
} |
} |
|
|
Line 335 $domainlogo
|
Line 336 $domainlogo
|
</tr> |
</tr> |
</table> |
</table> |
|
|
|
<script> |
|
// the if prevents the script error if the browser can't handle this |
|
if ( document.client.uname ) { document.client.uname.focus(); } |
|
</script> |
|
|
ENDDOCUMENT |
ENDDOCUMENT |
} |
} |
$r->print('</body></html>'); |
$r->print('</body></html>'); |