version 1.827, 2009/05/27 14:59:49
|
version 1.897, 2009/10/13 13:18:24
|
Line 483 ENDAUTHORBRW
|
Line 483 ENDAUTHORBRW
|
|
|
sub coursebrowser_javascript { |
sub coursebrowser_javascript { |
my ($domainfilter,$sec_element,$formname)=@_; |
my ($domainfilter,$sec_element,$formname)=@_; |
my $crs_or_grp_alert = &mt('Please select the type of LON-CAPA entity - Course or Group - for which you wish to add/modify a user role'); |
my $crs_or_grp_alert = &mt('Please select the type of LON-CAPA entity - Course or Community - for which you wish to add/modify a user role.'); |
my $output = ' |
my $id_functions = &javascript_index_functions(); |
|
my $output = ' |
<script type="text/javascript" language="JavaScript"> |
<script type="text/javascript" language="JavaScript"> |
// <![CDATA[ |
// <![CDATA[ |
var stdeditbrowser;'."\n"; |
var stdeditbrowser;'."\n"; |
$output .= <<"ENDSTDBRW"; |
|
|
$output .= <<"ENDSTDBRW"; |
function opencrsbrowser(formname,uname,udom,desc,extra_element,multflag,crstype) { |
function opencrsbrowser(formname,uname,udom,desc,extra_element,multflag,crstype) { |
var url = '/adm/pickcourse?'; |
var url = '/adm/pickcourse?'; |
var domainfilter = ''; |
|
var formid = getFormIdByName(formname); |
var formid = getFormIdByName(formname); |
if (formid > -1) { |
var domainfilter = getDomainFromSelectbox(formname,udom); |
var domid = getIndexByName(formid,udom); |
|
if (domid > -1) { |
|
if (document.forms[formid].elements[domid].type == 'select-one') { |
|
domainfilter=document.forms[formid].elements[domid].options[document.forms[formid].elements[domid].selectedIndex].value; |
|
} |
|
if (document.forms[formid].elements[domid].type == 'hidden') { |
|
domainfilter=document.forms[formid].elements[domid].value; |
|
} |
|
} |
|
} |
|
if (domainfilter != null) { |
if (domainfilter != null) { |
if (domainfilter != '') { |
if (domainfilter != '') { |
url += 'domainfilter='+domainfilter+'&'; |
url += 'domainfilter='+domainfilter+'&'; |
Line 529 sub coursebrowser_javascript {
|
Line 520 sub coursebrowser_javascript {
|
} |
} |
} |
} |
} |
} |
|
if (formname == 'ccrs') { |
|
var ownername = document.forms[formid].ccuname.value; |
|
var ownerdom = document.forms[formid].ccdomain.options[document.forms[formid].ccdomain.selectedIndex].value; |
|
url += '&cloner='+ownername+':'+ownerdom; |
|
} |
if (multflag !=null && multflag != '') { |
if (multflag !=null && multflag != '') { |
url += '&multiple='+multflag; |
url += '&multiple='+multflag; |
} |
} |
if (crstype == 'Course/Group') { |
if (crstype == 'Course/Community') { |
if (formname == 'cu') { |
if (formname == 'cu') { |
crstype = document.cu.crstype.options[document.cu.crstype.selectedIndex].value; |
crstype = document.cu.crstype.options[document.cu.crstype.selectedIndex].value; |
if (crstype == "") { |
if (crstype == "") { |
Line 550 sub coursebrowser_javascript {
|
Line 546 sub coursebrowser_javascript {
|
stdeditbrowser = open(url,title,options,'1'); |
stdeditbrowser = open(url,title,options,'1'); |
stdeditbrowser.focus(); |
stdeditbrowser.focus(); |
} |
} |
|
$id_functions |
function getFormIdByName(formname) { |
|
for (var i=0;i<document.forms.length;i++) { |
|
if (document.forms[i].name == formname) { |
|
return i; |
|
} |
|
} |
|
return -1; |
|
} |
|
|
|
function getIndexByName(formid,item) { |
|
for (var i=0;i<document.forms[formid].elements.length;i++) { |
|
if (document.forms[formid].elements[i].name == item) { |
|
return i; |
|
} |
|
} |
|
return -1; |
|
} |
|
ENDSTDBRW |
ENDSTDBRW |
if ($sec_element ne '') { |
if ($sec_element ne '') { |
$output .= &setsec_javascript($sec_element,$formname); |
$output .= &setsec_javascript($sec_element,$formname); |
Line 578 ENDSTDBRW
|
Line 557 ENDSTDBRW
|
return $output; |
return $output; |
} |
} |
|
|
|
sub javascript_index_functions { |
|
return <<"ENDJS"; |
|
|
|
function getFormIdByName(formname) { |
|
for (var i=0;i<document.forms.length;i++) { |
|
if (document.forms[i].name == formname) { |
|
return i; |
|
} |
|
} |
|
return -1; |
|
} |
|
|
|
function getIndexByName(formid,item) { |
|
for (var i=0;i<document.forms[formid].elements.length;i++) { |
|
if (document.forms[formid].elements[i].name == item) { |
|
return i; |
|
} |
|
} |
|
return -1; |
|
} |
|
|
|
function getDomainFromSelectbox(formname,udom) { |
|
var userdom; |
|
var formid = getFormIdByName(formname); |
|
if (formid > -1) { |
|
var domid = getIndexByName(formid,udom); |
|
if (domid > -1) { |
|
if (document.forms[formid].elements[domid].type == 'select-one') { |
|
userdom=document.forms[formid].elements[domid].options[document.forms[formid].elements[domid].selectedIndex].value; |
|
} |
|
if (document.forms[formid].elements[domid].type == 'hidden') { |
|
userdom=document.forms[formid].elements[domid].value; |
|
} |
|
} |
|
} |
|
return userdom; |
|
} |
|
|
|
ENDJS |
|
|
|
} |
|
|
|
sub userbrowser_javascript { |
|
my $id_functions = &javascript_index_functions(); |
|
return <<"ENDUSERBRW"; |
|
|
|
function openuserbrowser(formname,uname,udom,ulast,ufirst,uemail,hideudom,crsdom,caller) { |
|
var url = '/adm/pickuser?'; |
|
var userdom = getDomainFromSelectbox(formname,udom); |
|
if (userdom != null) { |
|
if (userdom != '') { |
|
url += 'srchdom='+userdom+'&'; |
|
} |
|
} |
|
url += 'form=' + formname + '&unameelement='+uname+ |
|
'&udomelement='+udom+ |
|
'&ulastelement='+ulast+ |
|
'&ufirstelement='+ufirst+ |
|
'&uemailelement='+uemail+ |
|
'&hideudomelement='+hideudom+ |
|
'&coursedom='+crsdom; |
|
if ((caller != null) && (caller != undefined)) { |
|
url += '&caller='+caller; |
|
} |
|
var title = 'User_Browser'; |
|
var options = 'scrollbars=1,resizable=1,menubar=0'; |
|
options += ',width=700,height=600'; |
|
var stdeditbrowser = open(url,title,options,'1'); |
|
stdeditbrowser.focus(); |
|
} |
|
|
|
function fix_domain (formname,udom,origdom,uname) { |
|
var formid = getFormIdByName(formname); |
|
if (formid > -1) { |
|
var unameid = getIndexByName(formid,uname); |
|
var domid = getIndexByName(formid,udom); |
|
var hidedomid = getIndexByName(formid,origdom); |
|
if (hidedomid > -1) { |
|
var fixeddom = document.forms[formid].elements[hidedomid].value; |
|
var unameval = document.forms[formid].elements[unameid].value; |
|
if ((fixeddom != '') && (fixeddom != undefined) && (fixeddom != null) && (unameval != '') && (unameval != undefined) && (unameval != null)) { |
|
if (domid > -1) { |
|
var slct = document.forms[formid].elements[domid]; |
|
if (slct.type == 'select-one') { |
|
var i; |
|
for (i=0;i<slct.length;i++) { |
|
if (slct.options[i].value==fixeddom) { slct.selectedIndex=i; } |
|
} |
|
} |
|
if (slct.type == 'hidden') { |
|
slct.value = fixeddom; |
|
} |
|
} |
|
} |
|
} |
|
} |
|
return; |
|
} |
|
|
|
$id_functions |
|
ENDUSERBRW |
|
} |
|
|
sub setsec_javascript { |
sub setsec_javascript { |
my ($sec_element,$formname) = @_; |
my ($sec_element,$formname) = @_; |
my $setsections = qq| |
my $setsections = qq| |
Line 620 function setSect(sectionlist) {
|
Line 702 function setSect(sectionlist) {
|
|
|
sub selectcourse_link { |
sub selectcourse_link { |
my ($form,$unameele,$udomele,$desc,$extra_element,$multflag,$selecttype)=@_; |
my ($form,$unameele,$udomele,$desc,$extra_element,$multflag,$selecttype)=@_; |
|
my $linktext = &mt('Select Course'); |
|
if ($selecttype eq 'Community') { |
|
$linktext = &mt('Select Community'); |
|
} |
return '<span class="LC_nobreak">' |
return '<span class="LC_nobreak">' |
."<a href='" |
."<a href='" |
.'javascript:opencrsbrowser("'.$form.'","'.$unameele |
.'javascript:opencrsbrowser("'.$form.'","'.$unameele |
.'","'.$udomele.'","'.$desc.'","'.$extra_element |
.'","'.$udomele.'","'.$desc.'","'.$extra_element |
.'","'.$multflag.'","'.$selecttype.'");' |
.'","'.$multflag.'","'.$selecttype.'");' |
."'>".&mt('Select Course').'</a>' |
."'>".$linktext.'</a>' |
.'</span>'; |
.'</span>'; |
} |
} |
|
|
Line 635 sub selectauthor_link {
|
Line 721 sub selectauthor_link {
|
&mt('Select Author').'</a>'; |
&mt('Select Author').'</a>'; |
} |
} |
|
|
|
sub selectuser_link { |
|
my ($form,$unameelem,$domelem,$lastelem,$firstelem,$emailelem,$hdomelem, |
|
$coursedom,$linktext,$caller) = @_; |
|
return '<a href="javascript:openuserbrowser('."'$form','$unameelem','$domelem',". |
|
"'$lastelem','$firstelem','$emailelem','$hdomelem','$coursedom','$caller'". |
|
');">'.$linktext.'</a>'; |
|
} |
|
|
sub check_uncheck_jscript { |
sub check_uncheck_jscript { |
my $jscript = <<"ENDSCRT"; |
my $jscript = <<"ENDSCRT"; |
function checkAll(field) { |
function checkAll(field) { |
Line 1111 sub help_menu_js {
|
Line 1205 sub help_menu_js {
|
|
|
my $template .= <<"ENDTEMPLATE"; |
my $template .= <<"ENDTEMPLATE"; |
<script type="text/javascript"> |
<script type="text/javascript"> |
// <!-- BEGIN LON-CAPA Internal |
|
// <![CDATA[ |
// <![CDATA[ |
|
// <!-- BEGIN LON-CAPA Internal |
var banner_link = ''; |
var banner_link = ''; |
function helpMenu(target) { |
function helpMenu(target) { |
var caller = this; |
var caller = this; |
Line 1137 function writeHelp(caller) {
|
Line 1231 function writeHelp(caller) {
|
caller.document.close() |
caller.document.close() |
caller.focus() |
caller.focus() |
} |
} |
// ]]> |
|
// END LON-CAPA Internal --> |
// END LON-CAPA Internal --> |
|
// ]]> |
</script> |
</script> |
ENDTEMPLATE |
ENDTEMPLATE |
return $template; |
return $template; |
Line 1787 sub select_level_form {
|
Line 1881 sub select_level_form {
|
|
|
=pod |
=pod |
|
|
=item * &select_dom_form($defdom,$name,$includeempty,$showdomdesc,$autosubmit) |
=item * &select_dom_form($defdom,$name,$includeempty,$showdomdesc,$onchange) |
|
|
Returns a string containing a <select name='$name' size='1'> form to |
Returns a string containing a <select name='$name' size='1'> form to |
allow a user to select the domain to preform an operation in. |
allow a user to select the domain to preform an operation in. |
Line 1798 selected");
|
Line 1892 selected");
|
|
|
If the $showdomdesc flag is set, the domain name is followed by the domain description. |
If the $showdomdesc flag is set, the domain name is followed by the domain description. |
|
|
If the $autosubmit flag is set, the form containing the domain selector will be auto-submitted by an onchange action. |
The optional $onchange argumnet specifies what should occur if the domain selector is changed, e.g., 'this.form.submit()' if the form is to be automatically submitted. |
|
|
=cut |
=cut |
|
|
#------------------------------------------- |
#------------------------------------------- |
sub select_dom_form { |
sub select_dom_form { |
my ($defdom,$name,$includeempty,$showdomdesc,$autosubmit) = @_; |
my ($defdom,$name,$includeempty,$showdomdesc,$onchange) = @_; |
my $onchange; |
if ($onchange) { |
if ($autosubmit) { |
$onchange = ' onchange="'.$onchange.'"'; |
$onchange = ' onchange="this.form.submit()"'; |
|
} |
} |
my @domains = sort {lc($a) cmp lc($b)} (&Apache::lonnet::all_domains()); |
my @domains = sort {lc($a) cmp lc($b)} (&Apache::lonnet::all_domains()); |
if ($includeempty) { @domains=('',@domains); } |
if ($includeempty) { @domains=('',@domains); } |
Line 2862 sub messagewrapper {
|
Line 2955 sub messagewrapper {
|
sub noteswrapper { |
sub noteswrapper { |
my ($link,$un,$do)=@_; |
my ($link,$un,$do)=@_; |
return |
return |
"<a href='/adm/email?recordftf=retrieve&recname=$un&recdom=$do'>$link</a>"; |
"<a href='/adm/email?recordftf=retrieve&recname=$un&recdom=$do'>$link</a>"; |
} |
} |
|
|
# ------------------------------------------------------------- Aboutme Wrapper |
# ------------------------------------------------------------- Aboutme Wrapper |
Line 2872 sub aboutmewrapper {
|
Line 2965 sub aboutmewrapper {
|
if (!defined($username) && !defined($domain)) { |
if (!defined($username) && !defined($domain)) { |
return; |
return; |
} |
} |
return '<a href="/adm/'.$domain.'/'.$username.'/aboutme"'. |
return '<a href="/adm/'.$domain.'/'.$username.'/aboutme?forcestudent=1"'. |
($target?' target="$target"':'').' title="'.&mt("View this user's personal information page").'">'.$link.'</a>'; |
($target?' target="$target"':'').' title="'.&mt("View this user's personal information page").'">'.$link.'</a>'; |
} |
} |
|
|
Line 2886 sub syllabuswrapper {
|
Line 2979 sub syllabuswrapper {
|
# ----------------------------------------------------------------------------- |
# ----------------------------------------------------------------------------- |
|
|
sub track_student_link { |
sub track_student_link { |
my ($linktext,$sname,$sdom,$target,$start) = @_; |
my ($linktext,$sname,$sdom,$target,$start,$only_body) = @_; |
my $link ="/adm/trackstudent?"; |
my $link ="/adm/trackstudent?"; |
my $title = 'View recent activity'; |
my $title = 'View recent activity'; |
if (defined($sname) && $sname !~ /^\s*$/ && |
if (defined($sname) && $sname !~ /^\s*$/ && |
Line 2900 sub track_student_link {
|
Line 2993 sub track_student_link {
|
$target = ''; |
$target = ''; |
} |
} |
if ($start) { $link.='&start='.$start; } |
if ($start) { $link.='&start='.$start; } |
|
if ($only_body) { $link .= '&only_body=1'; } |
$title = &mt($title); |
$title = &mt($title); |
$linktext = &mt($linktext); |
$linktext = &mt($linktext); |
return qq{<a href="$link" title="$title" $target>$linktext</a>}. |
return qq{<a href="$link" title="$title" $target>$linktext</a>}. |
Line 3766 sub blockcheck {
|
Line 3860 sub blockcheck {
|
($env{'request.role'} !~ m{^st\./\Q$cdom\E/\Q$cnum\E})); |
($env{'request.role'} !~ m{^st\./\Q$cdom\E/\Q$cnum\E})); |
next if ($no_userblock); |
next if ($no_userblock); |
|
|
# Retrieve blocking times and identity of blocker for course |
# Retrieve blocking times and identity of locker for course |
# of specified user, unless user has 'evb' privilege. |
# of specified user, unless user has 'evb' privilege. |
|
|
my ($start,$end)=&get_blocks($setters,$activity,$cdom,$cnum); |
my ($start,$end)=&get_blocks($setters,$activity,$cdom,$cnum); |
Line 3831 sub parse_block_record {
|
Line 3925 sub parse_block_record {
|
return ($setuname,$setudom,$title,$blocks); |
return ($setuname,$setudom,$title,$blocks); |
} |
} |
|
|
sub build_block_table { |
|
my ($startblock,$endblock,$setters) = @_; |
|
my %lt = &Apache::lonlocal::texthash( |
|
'cacb' => 'Currently active communication blocks', |
|
'cour' => 'Course', |
|
'dura' => 'Duration', |
|
'blse' => 'Block set by' |
|
); |
|
my $output; |
|
$output = '<br />'.$lt{'cacb'}.':<br />'; |
|
$output .= &start_data_table(); |
|
$output .= ' |
|
<tr> |
|
<th>'.$lt{'cour'}.'</th> |
|
<th>'.$lt{'dura'}.'</th> |
|
<th>'.$lt{'blse'}.'</th> |
|
</tr> |
|
'; |
|
foreach my $course (keys(%{$setters})) { |
|
my %courseinfo=&Apache::lonnet::coursedescription($course); |
|
for (my $i=0; $i<@{$$setters{$course}{staff}}; $i++) { |
|
my ($uname,$udom) = @{$$setters{$course}{staff}[$i]}; |
|
my $fullname = &plainname($uname,$udom); |
|
if (defined($env{'user.name'}) && defined($env{'user.domain'}) |
|
&& $env{'user.name'} ne 'public' |
|
&& $env{'user.domain'} ne 'public') { |
|
$fullname = &aboutmewrapper($fullname,$uname,$udom); |
|
} |
|
my ($openblock,$closeblock) = @{$$setters{$course}{times}[$i]}; |
|
$openblock = &Apache::lonlocal::locallocaltime($openblock); |
|
$closeblock= &Apache::lonlocal::locallocaltime($closeblock); |
|
$output .= &Apache::loncommon::start_data_table_row(). |
|
'<td>'.$courseinfo{'description'}.'</td>'. |
|
'<td>'.$openblock.' to '.$closeblock.'</td>'. |
|
'<td>'.$fullname.'</td>'. |
|
&Apache::loncommon::end_data_table_row(); |
|
} |
|
} |
|
$output .= &end_data_table(); |
|
} |
|
|
|
sub blocking_status { |
sub blocking_status { |
my ($activity,$uname,$udom) = @_; |
my ($activity,$uname,$udom) = @_; |
my %setters; |
my %setters; |
my ($blocked,$output,$ownitem,$is_course); |
|
my ($startblock,$endblock)=&blockcheck(\%setters,$activity,$uname,$udom); |
# check for active blocking |
if ($startblock && $endblock) { |
my ($startblock,$endblock)=&blockcheck(\%setters,$activity,$uname,$udom); |
$blocked = 1; |
|
if (wantarray) { |
my $blocked = $startblock && $endblock ? 1 : 0; |
my $category; |
|
if ($activity eq 'boards') { |
# caller just wants to know whether a block is active |
$category = 'Discussion posts in this course'; |
if (!wantarray) { return $blocked; } |
} elsif ($activity eq 'blogs') { |
|
$category = 'Blogs'; |
# build a link to a popup window containing the details |
} elsif ($activity eq 'port') { |
my $querystring = "?activity=$activity"; |
if (defined($uname) && defined($udom)) { |
# $uname and $udom decide whose portfolio the user is trying to look at |
if ($uname eq $env{'user.name'} && |
$querystring .= "&udom=$udom" if $udom; |
$udom eq $env{'user.domain'}) { |
$querystring .= "&uname=$uname" if $uname; |
$ownitem = 1; |
|
} |
my $output .= <<'END_MYBLOCK'; |
} |
function openWindow(url, wdwName, w, h, toolbar,scrollbar) { |
$is_course = &Apache::lonnet::is_course($udom,$uname); |
var options = "width=" + w + ",height=" + h + ","; |
if ($ownitem) { |
options += "resizable=yes,scrollbars="+scrollbar+",status=no,"; |
$category = 'Your portfolio files'; |
options += "menubar=no,toolbar="+toolbar+",location=no,directories=no"; |
} elsif ($is_course) { |
var newWin = window.open(url, wdwName, options); |
my $coursedesc; |
newWin.focus(); |
foreach my $course (keys(%setters)) { |
} |
my %courseinfo = |
END_MYBLOCK |
&Apache::lonnet::coursedescription($course); |
|
$coursedesc = $courseinfo{'description'}; |
$output = Apache::lonhtmlcommon::scripttag($output); |
} |
|
$category = "Group portfolio in the course '$coursedesc'"; |
my $popupUrl = "/adm/blockingstatus/$querystring"; |
} else { |
my $text = mt('Communication Blocked'); |
$category = 'Portfolio files belonging to '; |
|
if ($env{'user.name'} eq 'public' && |
$output .= <<"END_BLOCK"; |
$env{'user.domain'} eq 'public') { |
<div class='LC_comblock'> |
$category .= &plainname($uname,$udom); |
<a onclick='openWindow("$popupUrl","Blocking Table",600,300,"no","no");return false;' href='/adm/blockingstatus/$querystring' |
} else { |
title='$text'> |
$category .= &aboutmewrapper(&plainname($uname,$udom),$uname,$udom); |
<img class='LC_noBorder LC_middle' title='$text' src='/res/adm/pages/comblock.png' alt='$text'/></a> |
} |
<a onclick='openWindow("$popupUrl","Blocking Table",600,300,"no","no");return false;' href='/adm/blockingstatus/$querystring' |
} |
title='$text'>$text</a> |
} elsif ($activity eq 'groups') { |
</div> |
$category = 'Groups in this course'; |
|
} |
END_BLOCK |
my $showstart = &Apache::lonlocal::locallocaltime($startblock); |
|
my $showend = &Apache::lonlocal::locallocaltime($endblock); |
return ($blocked, $output); |
$output = '<br />'.&mt('[_1] will be inaccessible between [_2] and [_3] because communication is being blocked.',$category,$showstart,$showend).'<br />'; |
|
if (!($activity eq 'port' && !($ownitem) && !($is_course))) { |
|
$output .= &build_block_table($startblock,$endblock,\%setters); |
|
} |
|
} |
|
} |
|
if (wantarray) { |
|
return ($blocked,$output); |
|
} else { |
|
return $blocked; |
|
} |
|
} |
} |
|
|
############################################### |
############################################### |
Line 4005 sub determinedomain {
|
Line 4047 sub determinedomain {
|
my $domain=shift; |
my $domain=shift; |
if (! $domain) { |
if (! $domain) { |
# Determine domain if we have not been given one |
# Determine domain if we have not been given one |
$domain = $Apache::lonnet::perlvar{'lonDefDomain'}; |
$domain = &Apache::lonnet::default_login_domain(); |
if ($env{'user.domain'}) { $domain=$env{'user.domain'}; } |
if ($env{'user.domain'}) { $domain=$env{'user.domain'}; } |
if ($env{'request.role.domain'}) { |
if ($env{'request.role.domain'}) { |
$domain=$env{'request.role.domain'}; |
$domain=$env{'request.role.domain'}; |
Line 4183 sub designparm {
|
Line 4225 sub designparm {
|
############################################## |
############################################## |
=pod |
=pod |
|
|
|
=item * &authorspace() |
|
|
|
Inputs: ./. |
|
|
|
Returns: Path to the Construction Space of the current user's |
|
accessed author space |
|
The author space will be that of the current user |
|
when accessing the own author space |
|
and that of the co-author/assistent co-author |
|
when accessing the co-author's/assistent co-author's |
|
space |
|
|
|
=cut |
|
|
|
sub authorspace { |
|
my $caname = ''; |
|
if ($env{'request.role'} =~ /^ca|^aa/) { |
|
(undef,$caname) = |
|
($env{'request.role'}=~/($match_domain)\/($match_username)$/); |
|
} else { |
|
$caname = $env{'user.name'}; |
|
} |
|
return '/priv/'.$caname.'/'; |
|
} |
|
|
|
############################################## |
|
=pod |
|
|
=item * &head_subbox() |
=item * &head_subbox() |
|
|
Inputs: $content (contains HTML code with page functions, etc.) |
Inputs: $content (contains HTML code with page functions, etc.) |
Line 4195 Returns: HTML div with $content
|
Line 4265 Returns: HTML div with $content
|
sub head_subbox { |
sub head_subbox { |
my ($content)=@_; |
my ($content)=@_; |
my $output = |
my $output = |
'<div id="LC_head_subbox2">' #FIXME: solve conflicts with lonhtmlcommon:breadcrumbs LC_head_subbox |
'<div id="LC_head_subbox">' |
.$content |
.$content |
.'</div>' |
.'</div>' |
} |
} |
Line 4274 Inputs:
|
Line 4344 Inputs:
|
=item * $forcereg, if page should register as content page (relevant for |
=item * $forcereg, if page should register as content page (relevant for |
text interface only) |
text interface only) |
|
|
=item * $customtitle, alternate text to use instead of $title |
|
in the title box that appears, this text |
|
is not auto translated like the $title is |
|
|
|
=item * $no_nav_bar, if true, keep the 'what is this' info but remove the |
=item * $no_nav_bar, if true, keep the 'what is this' info but remove the |
navigational links |
navigational links |
|
|
Line 4302 other decorations will be returned.
|
Line 4368 other decorations will be returned.
|
=cut |
=cut |
|
|
sub bodytag { |
sub bodytag { |
my ($title,$function,$addentries,$bodyonly,$domain,$forcereg,$customtitle, |
my ($title,$function,$addentries,$bodyonly,$domain,$forcereg, |
$no_nav_bar,$bgcolor,$no_inline_link,$args)=@_; |
$no_nav_bar,$bgcolor,$no_inline_link,$args)=@_; |
|
|
if (!$args->{'no_auto_mt_title'}) { $title = &mt($title); } |
if (!$args->{'no_auto_mt_title'}) { $title = &mt($title); } |
Line 4357 sub bodytag {
|
Line 4423 sub bodytag {
|
$name = &aboutmewrapper($name,$env{'user.name'},$env{'user.domain'}); |
$name = &aboutmewrapper($name,$env{'user.name'},$env{'user.domain'}); |
} |
} |
|
|
my $roleinfo=(<<ENDROLE); |
|
<td class="LC_title_bar_who"> |
|
<div class="LC_title_bar_name"> |
|
$name |
|
|
|
</div> |
|
<div class="LC_title_bar_role"> |
|
$role |
|
</div> |
|
<div class="LC_title_bar_realm"> |
|
$realm |
|
</div> |
|
</td> |
|
ENDROLE |
|
|
|
my $titleinfo = '<h1>'.$title.'</h1>'; |
my $titleinfo = '<h1>'.$title.'</h1>'; |
if ($customtitle) { |
|
$titleinfo = $customtitle; |
|
} |
|
# |
# |
# Extra info if you are the DC |
# Extra info if you are the DC |
my $dc_info = ''; |
my $dc_info = ''; |
Line 4388 ENDROLE
|
Line 4436 ENDROLE
|
$dc_info = '('.$dc_info.')'; |
$dc_info = '('.$dc_info.')'; |
} |
} |
|
|
if (($env{'environment.remote'} eq 'off') || ($args->{'suppress_header_logos'})) { |
$role = "($role)" if $role; |
|
&get_unprocessed_cgi($ENV{'QUERY_STRING'}, ['inhibitmenu']); |
|
|
|
if ($env{'environment.remote'} eq 'off') { |
# No Remote |
# No Remote |
if ($env{'request.state'} eq 'construct') { |
if ($env{'request.state'} eq 'construct') { |
$forcereg=1; |
$forcereg=1; |
} |
} |
|
|
if (!$customtitle && $env{'request.state'} eq 'construct') { |
# if ($env{'request.state'} eq 'construct') { |
$titleinfo = &CSTR_pageheader(); #FIXME: Will be removed once all scripts have their own calls |
# $titleinfo = &CSTR_pageheader(); #FIXME: Will be removed once all scripts have their own calls |
} |
# } |
|
|
my $titletable = '<table id="LC_title_bar">' |
my $titletable = '<table id="LC_title_bar">' |
."<tr><td> $titleinfo $dc_info</td>".$roleinfo |
."<tr><td> $titleinfo $dc_info</td>" |
.'</tr></table>'; |
.'</tr></table>'; |
|
|
if ($no_nav_bar) { |
if ($no_nav_bar) { |
$bodytag .= $titletable; |
$bodytag .= $titletable; |
} else { |
} else { |
$bodytag .= qq|<div id="LC_nav_bar">$name ($role)<br /> |
$bodytag .= qq|<div id="LC_nav_bar">$name $role<br /> |
<em>$realm</em> $dc_info</div>|; |
<em>$realm</em> $dc_info</div>| unless $env{'form.inhibitmenu'}; |
if ($env{'request.state'} eq 'construct') { |
|
$bodytag .= &Apache::lonmenu::menubuttons($forcereg,$forcereg, |
#SD $titletable is obsolete |
$titletable); |
#SD if ($env{'request.state'} eq 'construct') { |
} else { |
#SD $bodytag .= &Apache::lonmenu::menubuttons($forcereg,$titletable); |
$bodytag .= &Apache::lonmenu::menubuttons($forcereg,$forcereg). |
#SD } else { |
$titletable; |
#SD $bodytag .= &Apache::lonmenu::menubuttons($forcereg).$titletable; |
} |
#SD } |
|
if ( $env{'form.inhibitmenu'} eq 'yes' |
|
|| $ENV{'REQUEST_URI'} eq '/adm/logout' |
|
|| $env{'request.noversionuri'} =~ m{^/res/adm/pages/}) { |
|
|
|
return $bodytag; |
|
} |
|
|
|
$bodytag .= Apache::lonhtmlcommon::scripttag( |
|
Apache::lonmenu::utilityfunctions(), |
|
'start'); |
|
$bodytag .= Apache::lonmenu::primary_menu(); |
|
$bodytag .= Apache::lonmenu::secondary_menu(); |
|
#SD remove next line |
|
#$bodytag .= Apache::lonmenu::menubuttons($forcereg); |
|
$bodytag .= Apache::lonmenu::serverform(); |
|
$bodytag .= Apache::lonhtmlcommon::scripttag('', 'end'); |
|
$bodytag .= Apache::lonmenu::innerregister($forcereg) if $forcereg; |
} |
} |
return $bodytag; |
return $bodytag; |
} |
} |
Line 4430 ENDROLE
|
Line 4498 ENDROLE
|
|
|
# Explicit link to get inline menu |
# Explicit link to get inline menu |
my $menu= ($no_inline_link?'' |
my $menu= ($no_inline_link?'' |
:'<br /><a href="/adm/remote?action=collapse">'.&mt('Switch to Inline Menu Mode').'</a>'); |
:'<a href="/adm/remote?action=collapse" target="_top">'.&mt('Switch to Inline Menu Mode').'</a>'); |
|
$bodytag .= qq|<div id="LC_nav_bar">$name $role |
|
<em>$realm</em> $dc_info </div> |
|
<ol class="LC_primary_menu LC_right"> |
|
<li>$menu</li> |
|
</ol>| unless $env{'form.inhibitmenu'}; |
# |
# |
return(<<ENDBODY); |
return(<<ENDBODY); |
$bodytag |
$bodytag |
Line 4439 $bodytag
|
Line 4512 $bodytag
|
<td>$messages </td> |
<td>$messages </td> |
</tr> |
</tr> |
<tr><td>$titleinfo $dc_info $menu</td> |
<tr><td>$titleinfo $dc_info $menu</td> |
$roleinfo |
|
</tr> |
</tr> |
</table> |
</table> |
ENDBODY |
ENDBODY |
Line 4561 sub standard_css {
|
Line 4633 sub standard_css {
|
|
|
my $sans = 'Verdana,Arial,Helvetica,sans-serif'; |
my $sans = 'Verdana,Arial,Helvetica,sans-serif'; |
my $mono = 'monospace'; |
my $mono = 'monospace'; |
my $data_table_head = $tabbg; |
my $data_table_head = $sidebg; |
my $data_table_light = '#EEEEEE'; |
my $data_table_light = '#FAFAFA'; |
my $data_table_dark = '#DDDDDD'; |
my $data_table_dark = '#F0F0F0'; |
my $data_table_darker = '#CCCCCC'; |
my $data_table_darker = '#CCCCCC'; |
my $data_table_highlight = '#FFFF00'; |
my $data_table_highlight = '#FFFF00'; |
my $mail_new = '#FFBB77'; |
my $mail_new = '#FFBB77'; |
Line 4722 table#LC_nav_location {
|
Line 4794 table#LC_nav_location {
|
table#LC_title_bar a { |
table#LC_title_bar a { |
color: $fontmenu; |
color: $fontmenu; |
} |
} |
|
|
table#LC_title_bar { |
table#LC_title_bar { |
clear: both; |
clear: both; |
/*display: none;*/ |
display: none; |
} |
} |
|
|
table#LC_title_bar, |
table#LC_title_bar, |
Line 4742 table#LC_title_bar.LC_with_remote {
|
Line 4814 table#LC_title_bar.LC_with_remote {
|
margin: 0; |
margin: 0; |
} |
} |
|
|
table.LC_docs_path { |
|
width: 100%; |
|
border: 0; |
|
background: $pgbg; |
|
border-collapse: collapse; |
|
padding: 0; |
|
} |
|
|
|
table#LC_title_bar td { |
table#LC_title_bar td { |
background: $tabbg; |
background: $tabbg; |
} |
} |
|
|
table#LC_title_bar .LC_title_bar_who { |
|
background: $tabbg; |
|
color: $fontmenu; |
|
font: small; |
|
text-align: right; |
|
margin: 0; |
|
} |
|
|
|
table#LC_title_bar div.LC_title_bar_name { |
|
margin: 0; |
|
} |
|
|
|
table#LC_title_bar div.LC_title_bar_role { |
|
margin: 0; |
|
} |
|
|
|
table#LC_title_bar div.LC_title_bar_realm { |
|
margin: 0; |
|
} |
|
|
|
table#LC_menubuttons img{ |
table#LC_menubuttons img{ |
border: none; |
border: none; |
} |
} |
Line 4813 table#LC_top_nav td.LC_top_nav_login {
|
Line 4857 table#LC_top_nav td.LC_top_nav_login {
|
text-align: center; |
text-align: center; |
} |
} |
|
|
table.LC_breadcrumbs td, |
.LC_breadcrumbs_component { |
table.LC_docs_path td { |
float: right; |
background: $tabbg; |
margin: 0 1em; |
color: $fontmenu; |
|
font-size: smaller; |
|
} |
} |
|
.LC_breadcrumbs_component img { |
table.LC_breadcrumbs td.LC_breadcrumbs_component, |
vertical-align: middle; |
table.LC_docs_path td.LC_docs_path_component { |
|
background: $tabbg; |
|
color: $fontmenu; |
|
font-size: larger; |
|
text-align: right; |
|
} |
} |
|
|
td.LC_table_cell_checkbox { |
td.LC_table_cell_checkbox { |
Line 4840 table#LC_mainmenu td.LC_mainmenu_column
|
Line 4877 table#LC_mainmenu td.LC_mainmenu_column
|
font-size: 70%; |
font-size: 70%; |
} |
} |
|
|
#LC_head_subbox { |
#LC_breadcrumbs { |
clear:both; |
clear:both; |
background: $sidebg; |
background: $sidebg; |
border-bottom: 1px solid $lg_border_color; |
border-bottom: 1px solid $lg_border_color; |
height: 32px; |
|
line-height: 32px; |
line-height: 32px; |
margin: 0; |
margin: 0; |
padding: 0; |
padding: 0; |
} |
} |
|
|
#LC_head_subbox2 { /* FIXME: replace by LC_head_subbox once lonhtmlcommon::breadcrumbs has been fixed */ |
/* Preliminary fix to hide breadcrumbs inside remote control window */ |
|
#LC_remote #LC_breadcrumbs { |
|
display:none; |
|
} |
|
|
|
#LC_head_subbox { |
clear:both; |
clear:both; |
background: #F8F8F8; /* $sidebg; */ |
background: #F8F8F8; /* $sidebg; */ |
border-bottom: 1px solid $lg_border_color; |
border-bottom: 1px solid $lg_border_color; |
Line 4896 td.LC_menubuttons_text {
|
Line 4937 td.LC_menubuttons_text {
|
font-weight: bold; |
font-weight: bold; |
} |
} |
|
|
.LC_preferences_labeltext { |
|
text-align: right; |
|
} |
|
|
|
.LC_roleslog_note { |
|
font-size: small; |
|
} |
|
|
|
.LC_mail_functions { |
|
font-weight: bold; |
|
} |
|
|
|
table.LC_data_table, |
table.LC_data_table, |
table.LC_mail_list { |
table.LC_mail_list { |
border: 1px solid #000000; |
border: 1px solid #000000; |
Line 4927 table.LC_nested_outer {
|
Line 4956 table.LC_nested_outer {
|
width: 100%; |
width: 100%; |
} |
} |
|
|
|
table.LC_innerpickbox, |
table.LC_nested { |
table.LC_nested { |
border: none; |
border: none; |
border-collapse: collapse; |
border-collapse: collapse; |
Line 4937 table.LC_nested {
|
Line 4967 table.LC_nested {
|
table.LC_data_table tr th, |
table.LC_data_table tr th, |
table.LC_calendar tr th, |
table.LC_calendar tr th, |
table.LC_mail_list tr th, |
table.LC_mail_list tr th, |
table.LC_prior_tries tr th { |
table.LC_prior_tries tr th, |
|
table.LC_innerpickbox tr th { |
font-weight: bold; |
font-weight: bold; |
background-color: $data_table_head; |
background-color: $data_table_head; |
color:$fontmenu; |
color:$fontmenu; |
font-size:90%; |
font-size:90%; |
} |
} |
|
|
|
table.LC_innerpickbox tr th, |
|
table.LC_innerpickbox tr td { |
|
vertical-align: top; |
|
} |
|
|
table.LC_data_table tr.LC_info_row > td { |
table.LC_data_table tr.LC_info_row > td { |
background-color: #CCCCCC; |
background-color: #CCCCCC; |
font-weight: bold; |
font-weight: bold; |
Line 4980 table.LC_nested tr.LC_empty_row td {
|
Line 5016 table.LC_nested tr.LC_empty_row td {
|
padding: 8px; |
padding: 8px; |
} |
} |
|
|
|
table.LC_caption { |
|
} |
|
|
table.LC_nested tr.LC_empty_row td { |
table.LC_nested tr.LC_empty_row td { |
padding: 4ex |
padding: 4ex |
} |
} |
Line 5209 table#LC_helpmenu {
|
Line 5248 table#LC_helpmenu {
|
|
|
table#LC_helpmenu fieldset legend { |
table#LC_helpmenu fieldset legend { |
font-size: larger; |
font-size: larger; |
font-weight: bold; |
|
} |
} |
|
|
table#LC_helpmenu_links { |
table#LC_helpmenu_links { |
Line 5262 table.LC_pick_box {
|
Line 5300 table.LC_pick_box {
|
} |
} |
|
|
table.LC_pick_box td.LC_pick_box_title { |
table.LC_pick_box td.LC_pick_box_title { |
background: $tabbg; |
background: $sidebg; |
font-weight: bold; |
font-weight: bold; |
text-align: right; |
text-align: right; |
vertical-align: top; |
vertical-align: top; |
Line 5270 table.LC_pick_box td.LC_pick_box_title {
|
Line 5308 table.LC_pick_box td.LC_pick_box_title {
|
padding: 8px; |
padding: 8px; |
} |
} |
|
|
table.LC_pick_box td.LC_selfenroll_pick_box_title { |
|
background: $tabbg; |
|
font-weight: bold; |
|
text-align: right; |
|
width: 350px; |
|
padding: 8px; |
|
} |
|
|
|
table.LC_pick_box td.LC_pick_box_value { |
table.LC_pick_box td.LC_pick_box_value { |
text-align: left; |
text-align: left; |
padding: 8px; |
padding: 8px; |
Line 5425 table.LC_status_selector td {
|
Line 5455 table.LC_status_selector td {
|
|
|
div.LC_feedback_link { |
div.LC_feedback_link { |
clear: both; |
clear: both; |
background: white; |
background: $sidebg; |
width: 100%; |
width: 100%; |
|
padding-bottom: 10px; |
|
border: 1px $tabbg solid; |
|
height: 22px; |
|
line-height: 22px; |
|
padding-top: 5px; |
|
} |
|
|
|
div.LC_feedback_link img { |
|
height: 22px; |
|
vertical-align:middle; |
|
} |
|
|
|
div.LC_feedback_link a{ |
|
text-decoration: none; |
|
} |
|
|
|
div.LC_comblock { |
|
display:inline; |
|
color:$font; |
|
font-size:90%; |
|
} |
|
|
|
div.LC_feedback_link div.LC_comblock { |
|
padding-left:5px; |
|
} |
|
|
|
div.LC_feedback_link div.LC_comblock a { |
|
color:$font; |
} |
} |
|
|
span.LC_feedback_link { |
span.LC_feedback_link { |
background: $feedback_link_bg; |
/* background: $feedback_link_bg; */ |
font-size: larger; |
font-size: larger; |
} |
} |
|
|
span.LC_message_link { |
span.LC_message_link { |
background: $feedback_link_bg; |
/* background: $feedback_link_bg; */ |
font-size: larger; |
font-size: larger; |
position: absolute; |
position: absolute; |
right: 1em; |
right: 1em; |
Line 5519 table.LC_prior_match tr td {
|
Line 5577 table.LC_prior_match tr td {
|
border: 1px solid #000000; |
border: 1px solid #000000; |
} |
} |
|
|
td.LC_nobreak, |
.LC_nobreak { |
span.LC_nobreak { |
|
white-space: nowrap; |
white-space: nowrap; |
} |
} |
|
|
Line 5544 table.LC_docs_documents td.LC_docs_docum
|
Line 5601 table.LC_docs_documents td.LC_docs_docum
|
padding: 4px; |
padding: 4px; |
} |
} |
|
|
.LC_docs_entry_move { |
div.LC_docs_entry_move { |
border: none; |
border: 1px solid #BBBBBB; |
border-collapse: collapse; |
|
} |
|
|
|
.LC_docs_entry_move td { |
|
border: 2px solid #BBBBBB; |
|
background: #DDDDDD; |
background: #DDDDDD; |
|
width: 22px; |
|
padding: 1px; |
|
margin: 0; |
} |
} |
|
|
.LC_docs_editor td.LC_docs_entry_commands { |
table.LC_data_table tr > td.LC_docs_entry_commands, |
|
table.LC_data_table tr > td.LC_docs_entry_parameter { |
background: #DDDDDD; |
background: #DDDDDD; |
font-size: x-small; |
font-size: x-small; |
} |
} |
|
|
|
.LC_docs_entry_parameter { |
|
white-space: nowrap; |
|
} |
|
|
.LC_docs_copy { |
.LC_docs_copy { |
color: #000099; |
color: #000099; |
} |
} |
Line 5580 table.LC_docs_documents td.LC_docs_docum
|
Line 5640 table.LC_docs_documents td.LC_docs_docum
|
font-size: x-small; |
font-size: x-small; |
} |
} |
|
|
.LC_docs_editor td.LC_docs_entry_title, |
|
.LC_docs_editor td.LC_docs_entry_icon { |
|
background: #FFFFBB; |
|
} |
|
|
|
.LC_docs_editor td.LC_docs_entry_parameter { |
|
background: #BBBBFF; |
|
font-size: x-small; |
|
white-space: nowrap; |
|
} |
|
|
|
table.LC_docs_adddocs td, |
table.LC_docs_adddocs td, |
table.LC_docs_adddocs th { |
table.LC_docs_adddocs th { |
border: 1px solid #BBBBBB; |
border: 1px solid #BBBBBB; |
Line 5627 table.LC_double_column tr td.LC_right_co
|
Line 5676 table.LC_double_column tr td.LC_right_co
|
vertical-align: top; |
vertical-align: top; |
} |
} |
|
|
span.LC_role_level { |
|
font-weight: bold; |
|
} |
|
|
|
div.LC_left_float { |
div.LC_left_float { |
float: left; |
float: left; |
padding-right: 5%; |
padding-right: 5%; |
Line 5722 div.LC_edit_problem_editxml_header div {
|
Line 5767 div.LC_edit_problem_editxml_header div {
|
margin-top: 5px; |
margin-top: 5px; |
} |
} |
|
|
div.LC_edit_problem_header_edit_row { |
|
background: $tabbg; |
|
padding: 3px; |
|
margin-bottom: 5px; |
|
} |
|
|
|
div.LC_edit_problem_header_title { |
div.LC_edit_problem_header_title { |
font-weight: bold; |
font-weight: bold; |
font-size: larger; |
font-size: larger; |
Line 5757 div.LC_edit_problem_saves {
|
Line 5796 div.LC_edit_problem_saves {
|
padding-bottom: 5px; |
padding-bottom: 5px; |
} |
} |
|
|
hr.LC_edit_problem_divide { |
|
clear: both; |
|
color: $tabbg; |
|
background-color: $tabbg; |
|
height: 3px; |
|
border: none; |
|
} |
|
|
|
img.stift{ |
img.stift{ |
border-width: 0; |
border-width: 0; |
vertical-align: middle; |
vertical-align: middle; |
Line 5799 div.LC_createcourse {
|
Line 5830 div.LC_createcourse {
|
# --------------------------*/ |
# --------------------------*/ |
|
|
a:hover, |
a:hover, |
ol.LC_smallMenu a:hover, |
ol.LC_primary_menu a:hover, |
ol#LC_MenuBreadcrumbs a:hover, |
ol#LC_MenuBreadcrumbs a:hover, |
ol#LC_PathBreadcrumbs a:hover, |
ol#LC_PathBreadcrumbs a:hover, |
ul#LC_TabMainMenuContent a:hover, |
ul#LC_secondary_menu a:hover, |
.LC_FormSectionClearButton input:hover |
.LC_FormSectionClearButton input:hover |
ul.LC_TabContent li:hover a { |
ul.LC_TabContent li:hover a { |
color:#BF2317; |
color:#BF2317; |
Line 5828 h2,h3,h4,h5,h6 {
|
Line 5859 h2,h3,h4,h5,h6 {
|
border-bottom:solid 1px $lg_border_color; |
border-bottom:solid 1px $lg_border_color; |
} |
} |
|
|
|
.LC_Box > .LC_hcell { |
|
margin: 0 -10px 10px -10px; |
|
} |
|
|
.LC_noBorder { |
.LC_noBorder { |
border: 0; |
border: 0; |
} |
} |
|
|
|
|
/* Main Header with discription of Person, Course, etc. */ |
|
|
|
.LC_Right { |
.LC_Right { |
float: right; |
float: right; |
margin: 0; |
margin: 0; |
Line 5863 dl,ul,div,fieldset {
|
Line 5895 dl,ul,div,fieldset {
|
/* overflow: hidden; */ |
/* overflow: hidden; */ |
} |
} |
|
|
|
fieldset > legend { |
|
font-weight: bold; |
|
padding: 0 5px 0 5px; |
|
} |
|
|
#LC_nav_bar { |
#LC_nav_bar { |
float: left; |
float: left; |
margin: 0; |
margin: 0.2em 0 0 0; |
} |
} |
|
|
#LC_nav_bar em{ |
#LC_nav_bar em{ |
Line 5873 dl,ul,div,fieldset {
|
Line 5910 dl,ul,div,fieldset {
|
font-style: normal; |
font-style: normal; |
} |
} |
|
|
ol.LC_smallMenu { |
ol.LC_primary_menu { |
float: right; |
float: right; |
|
margin: 0.2em 0 0 0; |
} |
} |
|
|
ol.LC_smallMenu, ol#LC_PathBreadcrumbs { |
ol#LC_PathBreadcrumbs { |
margin: 0; |
margin: 0; |
} |
} |
|
|
ol.LC_smallMenu li { |
ol.LC_primary_menu li { |
display: inline; |
display: inline; |
padding: 5px 5px 0 10px; |
padding: 5px 5px 0 10px; |
vertical-align: top; |
vertical-align: top; |
} |
} |
|
|
ol.LC_smallMenu li img { |
ol.LC_primary_menu li img { |
vertical-align: bottom; |
vertical-align: bottom; |
} |
} |
|
|
ol.LC_smallMenu a { |
ol.LC_primary_menu a { |
font-size: 90%; |
font-size: 90%; |
color: RGB(80, 80, 80); |
color: RGB(80, 80, 80); |
text-decoration: none; |
text-decoration: none; |
} |
} |
|
|
ul#LC_TabMainMenuContent { |
ul#LC_secondary_menu { |
clear: both; |
clear: both; |
color: $fontmenu; |
color: $fontmenu; |
background: $tabbg; |
background: $tabbg; |
list-style: none; |
list-style: none; |
padding: 0; |
padding: 0; |
margin: 0; |
margin: 0; |
float:left; |
|
width: 100%; |
width: 100%; |
} |
} |
|
|
ul#LC_TabMainMenuContent li { |
ul#LC_secondary_menu li { |
float: left; |
|
font-weight: bold; |
font-weight: bold; |
line-height: 1.8em; |
line-height: 1.8em; |
padding: 0 0.8em; |
padding: 0 0.8em; |
Line 5918 ul#LC_TabMainMenuContent li {
|
Line 5954 ul#LC_TabMainMenuContent li {
|
vertical-align: middle; |
vertical-align: middle; |
} |
} |
|
|
ul.LC_TabContent , |
ul.LC_TabContent { |
ul.LC_TabContentBigger { |
|
display:block; |
display:block; |
|
background: $sidebg; |
|
border-bottom: solid 1px $lg_border_color; |
list-style:none; |
list-style:none; |
margin: 0; |
margin: 0 -10px; |
padding: 0; |
padding: 0; |
} |
} |
|
|
ul.LC_TabContent li, |
ul.LC_TabContent li, |
ul.LC_TabContentBigger li { |
ul.LC_TabContentBigger li { |
display: inline; |
|
border-right: solid 1px $lg_border_color; |
|
float:left; |
float:left; |
line-height:140%; |
|
white-space:nowrap; |
|
} |
} |
|
|
ul#LC_TabMainMenuContent li a { |
ul#LC_secondary_menu li a { |
color: $fontmenu; |
color: $fontmenu; |
text-decoration: none; |
text-decoration: none; |
} |
} |
|
|
ul.LC_TabContent { |
ul.LC_TabContent { |
min-height:1.6em; |
min-height:1.5em; |
} |
} |
|
|
ul.LC_TabContent li { |
ul.LC_TabContent li { |
Line 5951 ul.LC_TabContent li {
|
Line 5984 ul.LC_TabContent li {
|
border-bottom:solid 1px $lg_border_color; |
border-bottom:solid 1px $lg_border_color; |
} |
} |
|
|
|
ul.LC_TabContent .right { |
|
float:right; |
|
} |
|
|
ul.LC_TabContent li a, ul.LC_TabContent li { |
ul.LC_TabContent li a, ul.LC_TabContent li { |
color:rgb(47,47,47); |
color:rgb(47,47,47); |
text-decoration:none; |
text-decoration:none; |
Line 5961 ul.LC_TabContent li a, ul.LC_TabContent
|
Line 5998 ul.LC_TabContent li a, ul.LC_TabContent
|
|
|
ul.LC_TabContent li:hover, ul.LC_TabContent li.active { |
ul.LC_TabContent li:hover, ul.LC_TabContent li.active { |
background:#FFFFFF url(/adm/lonIcons/open.gif) no-repeat scroll right center; |
background:#FFFFFF url(/adm/lonIcons/open.gif) no-repeat scroll right center; |
border-bottom:solid 1px #FFFFFF; |
border-bottom:solid 2px #FFFFFF; |
padding-right: 16px; |
padding-right: 16px; |
} |
} |
|
|
ul.LC_TabContentBigger li { |
#maincoursedoc { |
vertical-align:bottom; |
clear:both; |
border-top:solid 1px $lg_border_color; |
|
border-left:solid 1px $lg_border_color; |
|
padding:5px 10px 5px 10px; |
|
margin-left:2px; |
|
background:url(/adm/lonIcons/lightGreyBG.png) repeat-x left top; |
|
} |
} |
|
|
ul.LC_TabContentBigger li:hover, |
ul.LC_TabContentBigger { |
ul.LC_TabContentBigger li.active { |
display:block; |
background:url(/adm/lonIcons/lightGreyBG.png) repeat-x right bottom; |
list-style:none; |
|
padding: 0; |
} |
} |
|
|
ul.LC_TabContentBigger li, |
ul.LC_TabContentBigger li { |
|
vertical-align:bottom; |
|
height: 30px; |
|
font-size:110%; |
|
font-weight:bold; |
|
color: #737373; |
|
} |
|
|
|
|
ul.LC_TabContentBigger li a { |
ul.LC_TabContentBigger li a { |
font-size:110%; |
background:url('/adm/lonIcons/tabbgleft.gif') left bottom no-repeat; |
font-weight:bold; |
height: 30px; |
|
line-height: 30px; |
|
text-align: center; |
|
display: block; |
|
text-decoration: none; |
|
} |
|
|
|
ul.LC_TabContentBigger li:hover a, |
|
ul.LC_TabContentBigger li.active a { |
|
background:url('/adm/lonIcons/tabbgleft.gif') left top no-repeat; |
|
color:$font; |
|
text-decoration: underline; |
|
} |
|
|
|
|
|
ul.LC_TabContentBigger li b { |
|
background: url('/adm/lonIcons/tabbgright.gif') no-repeat right bottom; |
|
display: block; |
|
float: left; |
|
padding: 0 30px; |
|
} |
|
|
|
ul.LC_TabContentBigger li:hover b, |
|
ul.LC_TabContentBigger li.active b { |
|
background:url('/adm/lonIcons/tabbgright.gif') right top no-repeat; |
|
color:$font; |
|
border-bottom: 1px solid #FFFFFF; |
|
} |
|
|
|
|
|
ul.LC_CourseBreadcrumbs { |
|
background: $sidebg; |
|
line-height: 32px; |
|
padding-left: 10px; |
|
margin: 0 0 10px 0; |
|
list-style-position: inside; |
|
|
} |
} |
|
|
ol#LC_MenuBreadcrumbs, |
ol#LC_MenuBreadcrumbs, |
ol#LC_PathBreadcrumbs, |
ol#LC_PathBreadcrumbs { |
ul#LC_CourseBreadcrumbs { |
|
padding-left: 10px; |
padding-left: 10px; |
margin: 0; |
margin: 0; |
list-style-position: inside; |
list-style-position: inside; |
Line 5995 ul#LC_CourseBreadcrumbs {
|
Line 6071 ul#LC_CourseBreadcrumbs {
|
|
|
ol#LC_MenuBreadcrumbs li, |
ol#LC_MenuBreadcrumbs li, |
ol#LC_PathBreadcrumbs li, |
ol#LC_PathBreadcrumbs li, |
ul#LC_CourseBreadcrumbs li { |
ul.LC_CourseBreadcrumbs li { |
display: inline; |
display: inline; |
padding: 0 0 0 10px; |
white-space: nowrap; |
overflow:hidden; |
|
} |
} |
|
|
ol#LC_MenuBreadcrumbs li a, |
ol#LC_MenuBreadcrumbs li a, |
ul#LC_CourseBreadcrumbs li a { |
ul.LC_CourseBreadcrumbs li a { |
text-decoration: none; |
text-decoration: none; |
font-size:90%; |
font-size:90%; |
} |
} |
Line 6013 ol#LC_PathBreadcrumbs li a {
|
Line 6088 ol#LC_PathBreadcrumbs li a {
|
font-weight:bold; |
font-weight:bold; |
} |
} |
|
|
.LC_BoxPadding { |
.LC_Box { |
padding: 10px; |
border: solid 1px $lg_border_color; |
} |
padding: 0 10px 10px 10px; |
|
|
.LC_ContentBoxSpecial { |
|
border: solid 1px $lg_border_color; |
|
} |
|
|
|
.LC_ContentBoxSpecialContactInfo { |
|
border: solid 1px $lg_border_color; |
|
max-width:25%; |
|
min-width:25%; |
|
} |
} |
|
|
.LC_AboutMe_Image { |
.LC_AboutMe_Image { |
Line 6113 div.LC_columnSection>* {
|
Line 6179 div.LC_columnSection>* {
|
overflow:hidden; |
overflow:hidden; |
} |
} |
|
|
.ContentBoxSpecialTemplate { |
|
border: solid 1px $lg_border_color; |
|
} |
|
|
|
.ContentBoxTemplate { |
|
padding:10px; |
|
} |
|
|
|
div.LC_columnSection > .ContentBoxTemplate, |
|
div.LC_columnSection > .ContentBoxSpecialTemplate { |
|
width: 600px; |
|
} |
|
|
|
.clear { |
|
clear: both; |
|
line-height: 0; |
|
font-size: 0; |
|
height: 0; |
|
} |
|
|
|
.LC_loginpage_container { |
.LC_loginpage_container { |
text-align:left; |
text-align:left; |
margin : 0 auto; |
margin : 0 auto; |
Line 6187 table em {
|
Line 6233 table em {
|
table.LC_tableBrowseRes, |
table.LC_tableBrowseRes, |
table.LC_tableOfContent { |
table.LC_tableOfContent { |
border:none; |
border:none; |
border-spacing: 1; |
border-spacing: 1px; |
padding: 3px; |
padding: 3px; |
background-color: #FFFFFF; |
background-color: #FFFFFF; |
font-size: 90%; |
font-size: 90%; |
Line 6281 a.LC_toolbarItem {
|
Line 6327 a.LC_toolbarItem {
|
background-color:transparent; |
background-color:transparent; |
} |
} |
|
|
ul.LC_functionslist li { |
ul.LC_funclist li { |
float: left; |
float: left; |
white-space: nowrap; |
white-space: nowrap; |
height: 35px; /* at least as high as heighest list item */ |
height: 35px; /* at least as high as heighest list item */ |
Line 6416 sub xml_begin {
|
Line 6462 sub xml_begin {
|
.'<html xmlns:math="http://www.w3.org/1998/Math/MathML" ' |
.'<html xmlns:math="http://www.w3.org/1998/Math/MathML" ' |
.'xmlns="http://www.w3.org/1999/xhtml">'; |
.'xmlns="http://www.w3.org/1999/xhtml">'; |
} else { |
} else { |
$output='<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html>'; |
$output='<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">' |
|
.'<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">'; |
} |
} |
return $output; |
return $output; |
} |
} |
Line 6492 $args - additional optional args support
|
Line 6539 $args - additional optional args support
|
a html attribute |
a html attribute |
force_register -> if is true will turn on the &bodytag() |
force_register -> if is true will turn on the &bodytag() |
$forcereg arg |
$forcereg arg |
body_title -> alternate text to use instead of $title |
|
in the title box that appears, this text |
|
is not auto translated like the $title is |
|
frameset -> if true will start with a <frameset> |
frameset -> if true will start with a <frameset> |
rather than <body> |
rather than <body> |
skip_phases -> hash ref of |
skip_phases -> hash ref of |
Line 6506 $args - additional optional args support
|
Line 6550 $args - additional optional args support
|
inherit_jsmath -> when creating popup window in a page, |
inherit_jsmath -> when creating popup window in a page, |
should it have jsmath forced on by the |
should it have jsmath forced on by the |
current page |
current page |
|
bread_crumbs -> Array containing breadcrumbs |
|
bread_crumbs_components -> if exists show it as headline else show only the breadcrumbs |
|
|
=back |
=back |
|
|
Line 6538 sub start_page {
|
Line 6584 sub start_page {
|
my $attr_string = &make_attr_string($args->{'force_register'}, |
my $attr_string = &make_attr_string($args->{'force_register'}, |
$args->{'add_entries'}); |
$args->{'add_entries'}); |
$result .= "\n<frameset $attr_string>\n"; |
$result .= "\n<frameset $attr_string>\n"; |
} else { |
} else { |
$result .= |
$result .= |
&bodytag($title, |
&bodytag($title, |
$args->{'function'}, $args->{'add_entries'}, |
$args->{'function'}, $args->{'add_entries'}, |
$args->{'only_body'}, $args->{'domain'}, |
$args->{'only_body'}, $args->{'domain'}, |
$args->{'force_register'}, $args->{'body_title'}, |
$args->{'force_register'}, $args->{'no_nav_bar'}, |
$args->{'no_nav_bar'}, $args->{'bgcolor'}, |
$args->{'bgcolor'}, $args->{'no_inline_link'}, |
$args->{'no_inline_link'}, |
$args); |
$args); |
} |
} |
|
} |
} |
|
|
if ($args->{'js_ready'}) { |
if ($args->{'js_ready'}) { |
Line 6743 sub simple_error_page {
|
Line 6788 sub simple_error_page {
|
sub end_data_table_header_row { |
sub end_data_table_header_row { |
return '</tr>'."\n";; |
return '</tr>'."\n";; |
} |
} |
|
|
|
sub data_table_caption { |
|
my $caption = shift; |
|
return "<caption class=\"LC_caption\">$caption</caption>"; |
|
} |
} |
} |
|
|
=pod |
=pod |
Line 7515 sub user_picker {
|
Line 7565 sub user_picker {
|
# loncreateuser::print_user_query_page() |
# loncreateuser::print_user_query_page() |
# has been completed. |
# has been completed. |
next if ($option eq 'alc'); |
next if ($option eq 'alc'); |
|
next if (($option eq 'crs') && ($env{'form.form'} eq 'requestcrs')); |
next if ($option eq 'crs' && !$env{'request.course.id'}); |
next if ($option eq 'crs' && !$env{'request.course.id'}); |
if ($curr_selected{'srchin'} eq $option) { |
if ($curr_selected{'srchin'} eq $option) { |
$srchinsel .= ' |
$srchinsel .= ' |
Line 7679 $newuserscript
|
Line 7730 $newuserscript
|
|
|
$new_user_create |
$new_user_create |
|
|
<table> |
|
<tr> |
|
<td>$lt{'doma'}:</td> |
|
<td>$domform</td> |
|
</td> |
|
</tr> |
|
<tr> |
|
<td>$lt{'usr'}:</td> |
|
<td>$srchbysel |
|
$srchtypesel |
|
<input type="text" size="15" name="srchterm" value="$srchterm" /> |
|
$srchinsel |
|
</td> |
|
</tr> |
|
</table> |
|
<br /> |
|
END_BLOCK |
END_BLOCK |
|
|
|
$output .= &Apache::lonhtmlcommon::start_pick_box(). |
|
&Apache::lonhtmlcommon::row_title($lt{'doma'}). |
|
$domform. |
|
&Apache::lonhtmlcommon::row_closure(). |
|
&Apache::lonhtmlcommon::row_title($lt{'usr'}). |
|
$srchbysel. |
|
$srchtypesel. |
|
'<input type="text" size="15" name="srchterm" value="'.$srchterm.'" />'. |
|
$srchinsel. |
|
&Apache::lonhtmlcommon::row_closure(1). |
|
&Apache::lonhtmlcommon::end_pick_box(). |
|
'<br />'; |
return $output; |
return $output; |
} |
} |
|
|
Line 8569 sub csv_print_samples {
|
Line 8616 sub csv_print_samples {
|
$r->print(&mt('Samples').'<br />'.&start_data_table(). |
$r->print(&mt('Samples').'<br />'.&start_data_table(). |
&start_data_table_header_row()); |
&start_data_table_header_row()); |
foreach my $sample (sort({$a <=> $b} keys(%{ $samples->[0] }))) { |
foreach my $sample (sort({$a <=> $b} keys(%{ $samples->[0] }))) { |
$r->print('<th>'.&mt('Column [_1]',($sample+1)).'</th>'); } |
$r->print('<th>'.&mt('Column [_1]',($sample+1)).'</th>'); } |
$r->print(&end_data_table_header_row()); |
$r->print(&end_data_table_header_row()); |
foreach my $hash (@$samples) { |
foreach my $hash (@$samples) { |
$r->print(&start_data_table_row()); |
$r->print(&start_data_table_row()); |
Line 8613 sub csv_print_select_table {
|
Line 8660 sub csv_print_select_table {
|
my ($value,$display,$defaultcol)=@{ $array_ref }; |
my ($value,$display,$defaultcol)=@{ $array_ref }; |
$r->print(&start_data_table_row().'<td>'.$display.'</td>'); |
$r->print(&start_data_table_row().'<td>'.$display.'</td>'); |
|
|
$r->print('<td><select name=f'.$i. |
$r->print('<td><select name="f'.$i.'"'. |
' onchange="javascript:flip(this.form,'.$i.');">'); |
' onchange="javascript:flip(this.form,'.$i.');">'); |
$r->print('<option value="none"></option>'); |
$r->print('<option value="none"></option>'); |
foreach my $sample (sort({$a <=> $b} keys(%{ $samples->[0] }))) { |
foreach my $sample (sort({$a <=> $b} keys(%{ $samples->[0] }))) { |
Line 9267 sub restore_settings {
|
Line 9314 sub restore_settings {
|
|
|
=item * &build_recipient_list() |
=item * &build_recipient_list() |
|
|
Build recipient lists for four types of e-mail: |
Build recipient lists for five types of e-mail: |
(a) Error Reports, (b) Package Updates, (c) lonstatus warnings/errors |
(a) Error Reports, (b) Package Updates, (c) lonstatus warnings/errors |
(d) Help requests, generated by |
(d) Help requests, (e) Course requests needing approval, generated by |
lonerrorhandler.pm, CHECKRPMS, loncron, and lonsupportreq.pm respectively. |
lonerrorhandler.pm, CHECKRPMS, loncron, lonsupportreq.pm and |
|
loncoursequeueadmin.pm respectively. |
|
|
Inputs: |
Inputs: |
defmail (scalar - email address of default recipient), |
defmail (scalar - email address of default recipient), |
Line 9843 sub check_clone {
|
Line 9891 sub check_clone {
|
$clonemsg = &mt('No new course created.').$linefeed.&mt('A new course could not be cloned from the specified original - [_1] - because it is a non-existent course.',$args->{'clonecourse'}.':'.$args->{'clonedomain'}); |
$clonemsg = &mt('No new course created.').$linefeed.&mt('A new course could not be cloned from the specified original - [_1] - because it is a non-existent course.',$args->{'clonecourse'}.':'.$args->{'clonedomain'}); |
} else { |
} else { |
my %clonedesc = &Apache::lonnet::coursedescription($cloneid,{'one_time' => 1}); |
my %clonedesc = &Apache::lonnet::coursedescription($cloneid,{'one_time' => 1}); |
if ($env{'request.role.domain'} eq $args->{'clonedomain'}) { |
if (($env{'request.role.domain'} eq $args->{'clonedomain'}) && |
|
(&Apache::lonnet::allowed('ccc',$env{'request.role.domain'}))) { |
$can_clone = 1; |
$can_clone = 1; |
} else { |
} else { |
my %clonehash = &Apache::lonnet::get('environment',['cloners'], |
my %clonehash = &Apache::lonnet::get('environment',['cloners'], |
Line 9871 sub check_clone {
|
Line 9920 sub check_clone {
|
} |
} |
|
|
sub construct_course { |
sub construct_course { |
my ($args,$logmsg,$courseid,$crsudom,$crsunum,$udom,$uname,$context) = @_; |
my ($args,$logmsg,$courseid,$crsudom,$crsunum,$udom,$uname,$context,$cnum,$category) = @_; |
my $outcome; |
my $outcome; |
my $linefeed = '<br />'."\n"; |
my $linefeed = '<br />'."\n"; |
if ($context eq 'auto') { |
if ($context eq 'auto') { |
Line 9909 sub construct_course {
|
Line 9958 sub construct_course {
|
$args->{'crscode'}, |
$args->{'crscode'}, |
$args->{'ccuname'}.':'. |
$args->{'ccuname'}.':'. |
$args->{'ccdomain'}, |
$args->{'ccdomain'}, |
$args->{'crstype'}); |
$args->{'crstype'}, |
|
$cnum,$context,$category); |
|
|
# Note: The testing routines depend on this being output; see |
# Note: The testing routines depend on this being output; see |
# Utils::Course. This needs to at least be output as a comment |
# Utils::Course. This needs to at least be output as a comment |
Line 10218 sub group_term {
|
Line 10268 sub group_term {
|
my $crstype = &course_type(); |
my $crstype = &course_type(); |
my %names = ( |
my %names = ( |
'Course' => 'group', |
'Course' => 'group', |
'Group' => 'team', |
'Community' => 'group', |
); |
); |
return $names{$crstype}; |
return $names{$crstype}; |
} |
} |
Line 10411 sub init_user_environment {
|
Line 10461 sub init_user_environment {
|
&Apache::lonnet::usertools_access($username,$domain,$tool,'reload'); |
&Apache::lonnet::usertools_access($username,$domain,$tool,'reload'); |
} |
} |
|
|
foreach my $crstype ('official','unofficial') { |
foreach my $crstype ('official','unofficial','community') { |
$userenv{'canrequest.'.$crstype} = |
$userenv{'canrequest.'.$crstype} = |
&Apache::lonnet::usertools_access($username,$domain,$crstype, |
&Apache::lonnet::usertools_access($username,$domain,$crstype, |
'reload','requestcourses'); |
'reload','requestcourses'); |