version 1.121, 2004/11/01 04:31:03
|
version 1.124, 2004/11/11 18:43:25
|
Line 43 use Apache::lonnet();
|
Line 43 use Apache::lonnet();
|
use Apache::Constants qw(:common); |
use Apache::Constants qw(:common); |
use Apache::lonhtmlcommon(); |
use Apache::lonhtmlcommon(); |
use Apache::loncommon(); |
use Apache::loncommon(); |
use Apache::lonnavmaps(); |
|
use Apache::lonlocal; |
use Apache::lonlocal; |
|
|
use vars qw(@desklines $readdesk); |
use vars qw(@desklines $readdesk); |
Line 886 sub rawconfig {
|
Line 885 sub rawconfig {
|
if ($ENV{'request.course.fn'}) { |
if ($ENV{'request.course.fn'}) { |
$output.=switch($uname,$udom,$row,$col,$img,$top,$bot,$act,$desc); |
$output.=switch($uname,$udom,$row,$col,$img,$top,$bot,$act,$desc); |
} |
} |
|
} elsif ($pro =~ /^courseenv_(.*)$/) { |
|
my $key = $1; |
|
if ($ENV{'course.'.$ENV{'request.course.id'}.'.'.$key}) { |
|
$output.=switch($uname,$udom,$row,$col,$img,$top,$bot,$act,$desc); |
|
} |
} elsif ($pro =~ /^course_(.*)$/) { |
} elsif ($pro =~ /^course_(.*)$/) { |
# Check for permissions inside of a course |
# Check for permissions inside of a course |
if (($ENV{'request.course.id'}) && |
if (($ENV{'request.course.id'}) && |
Line 921 sub rawconfig {
|
Line 925 sub rawconfig {
|
unless (($ENV{'browser.interface'} eq 'textual') || |
unless (($ENV{'browser.interface'} eq 'textual') || |
($ENV{'environment.remote'} eq 'off')) { |
($ENV{'environment.remote'} eq 'off')) { |
$output.="\nwindow.status='Synchronizing Time';swmenu.syncclock(1000*".time.");\nwindow.status='Remote Control Configured.';"; |
$output.="\nwindow.status='Synchronizing Time';swmenu.syncclock(1000*".time.");\nwindow.status='Remote Control Configured.';"; |
|
if (&Apache::lonmsg::newmail()) { |
|
$output.='swmenu.setstatus("you have","messages");'; |
|
} |
} |
} |
|
|
return $output; |
return $output; |
} |
} |
|
|
Line 952 sub footer {
|
Line 960 sub footer {
|
|
|
} |
} |
|
|
|
sub nav_control_js { |
|
my $nav=($ENV{'environment.remotenavmap'} eq 'on'); |
|
return (<<NAVCONTROL); |
|
var w_loncapanav_flag="$nav"; |
|
|
|
|
|
function gonav(url) { |
|
if (w_loncapanav_flag != 1) { |
|
gopost(url,''); |
|
} else { |
|
navwindow=window.open(url, |
|
"loncapanav","height=600,width=400,scrollbars=1"); |
|
} |
|
} |
|
NAVCONTROL |
|
} |
|
|
sub utilityfunctions { |
sub utilityfunctions { |
unless (($ENV{'browser.interface'} eq 'textual') || |
unless (($ENV{'browser.interface'} eq 'textual') || |
($ENV{'environment.remote'} eq 'off')) { return ''; } |
($ENV{'environment.remote'} eq 'off')) { return ''; } |
my $currenturl=$ENV{'request.noversionuri'}; |
my $currenturl=$ENV{'request.noversionuri'}; |
my $currentsymb=$ENV{'request.symb'}; |
my $currentsymb=$ENV{'request.symb'}; |
my $nav_control=&Apache::lonnavmaps::nav_control_js(); |
my $nav_control=&nav_control_js(); |
return (<<ENDUTILITY) |
return (<<ENDUTILITY) |
|
|
var currentURL="$currenturl"; |
var currentURL="$currenturl"; |