version 1.23, 2004/10/29 18:40:40
|
version 1.25, 2004/12/01 17:10:55
|
Line 40 package Apache::lonconstruct;
|
Line 40 package Apache::lonconstruct;
|
|
|
|
|
use strict; |
use strict; |
use Apache::Constants qw(:common :http :methods REDIRECT); |
use Apache::Constants qw(:common :http :methods); |
use Apache::lonnet; |
use Apache::lonnet; |
use Apache::Log (); |
use Apache::Log (); |
use HTML::Entities(); |
use HTML::Entities(); |
Line 123 sub handler {
|
Line 123 sub handler {
|
# |
# |
my $toprows = 0; |
my $toprows = 0; |
my $topsrc = ''; |
my $topsrc = ''; |
if ($ENV{'environment.remote'} eq 'on') { |
if ($ENV{'environment.remote'} ne 'off') { |
$toprows = '110'; |
$toprows = '110'; |
$topsrc = '/adm/localize/adm/publisher.html'; |
$topsrc = '/adm/localize/adm/publisher.html'; |
} |
} |