loncom/interface/loncommon.pm - diff

Return to loncommon.pm CVS log

Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/loncommon.pm between versions 1.692.4.9 and 1.808

version 1.692.4.9, 2009/08/14 08:07:11	version 1.808, 2009/05/08 16:08:56
Line 271 BEGIN {	Line 271 BEGIN {
}	}
}	}
&Apache::lonnet::logthis(	&Apache::lonnet::logthis(
"<font color=yellow>INFO: Read file types</font>");	"<span style='color:yellow;'>INFO: Read file types</span>");
$readit=1;	$readit=1;
} # end of unless($readit)	} # end of unless($readit)

Line 407 sub studentbrowser_javascript {	Line 407 sub studentbrowser_javascript {
) { return ''; }	) { return ''; }
return (<<'ENDSTDBRW');	return (<<'ENDSTDBRW');
<script type="text/javascript" language="Javascript">	<script type="text/javascript" language="Javascript">
// <![CDATA[
var stdeditbrowser;	var stdeditbrowser;
function openstdbrowser(formname,uname,udom,roleflag,ignorefilter,courseadvonly) {	function openstdbrowser(formname,uname,udom,roleflag,ignorefilter,courseadvonly) {
var url = '/adm/pickstudent?';	var url = '/adm/pickstudent?';
Line 430 sub studentbrowser_javascript {	Line 429 sub studentbrowser_javascript {
stdeditbrowser = open(url,title,options,'1');	stdeditbrowser = open(url,title,options,'1');
stdeditbrowser.focus();	stdeditbrowser.focus();
}	}
// ]]>
</script>	</script>
ENDSTDBRW	ENDSTDBRW
}	}
Line 452 sub selectstudent_link {	Line 450 sub selectstudent_link {
&mt('Select User').'</a></span>';	&mt('Select User').'</a></span>';
}	}
if ($env{'request.role'}=~/^(au\|dc\|su)/) {	if ($env{'request.role'}=~/^(au\|dc\|su)/) {
$callargs .= ",1";	$callargs .= ",1";
return '<span class="LC_nobreak">'.	return '<span class="LC_nobreak">'.
'<a href="javascript:openstdbrowser('.$callargs.');">'.	'<a href="javascript:openstdbrowser('.$callargs.');">'.
&mt('Select User').'</a></span>';	&mt('Select User').'</a></span>';
Line 462 sub selectstudent_link {	Line 460 sub selectstudent_link {

sub authorbrowser_javascript {	sub authorbrowser_javascript {
return <<"ENDAUTHORBRW";	return <<"ENDAUTHORBRW";
<script type="text/javascript">	<script type="text/javascript" language="JavaScript">
// <![CDATA[
var stdeditbrowser;	var stdeditbrowser;

function openauthorbrowser(formname,udom) {	function openauthorbrowser(formname,udom) {
Line 475 function openauthorbrowser(formname,udom	Line 472 function openauthorbrowser(formname,udom
stdeditbrowser = open(url,title,options,'1');	stdeditbrowser = open(url,title,options,'1');
stdeditbrowser.focus();	stdeditbrowser.focus();
}	}
// ]]>
</script>	</script>
ENDAUTHORBRW	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 Community - 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 Group - for which you wish to add/modify a user role');
my $id_functions = &javascript_index_functions();	my $output = '
my $output = '
<script type="text/javascript" language="JavaScript">	<script type="text/javascript" language="JavaScript">
// <![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 = getDomainFromSelectbox(formname,udom);	var domainfilter = '';
	var formid = getFormIdByName(formname);
	if (formid > -1) {
	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 511 sub coursebrowser_javascript {	Line 517 sub coursebrowser_javascript {
else {	else {
if (formname == 'portform') {	if (formname == 'portform') {
url += '&setroles='+extra_element;	url += '&setroles='+extra_element;
	} else {
	if (formname == 'rules') {
	url += '&fixeddom='+extra_element;
	}
}	}
}	}
}	}
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/Community') {	if (crstype == 'Course/Group') {
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 540 sub coursebrowser_javascript {	Line 545 sub coursebrowser_javascript {
stdeditbrowser = open(url,title,options,'1');	stdeditbrowser = open(url,title,options,'1');
stdeditbrowser.focus();	stdeditbrowser.focus();
}	}
$id_functions
ENDSTDBRW
if ($sec_element ne '') {
$output .= &setsec_javascript($sec_element,$formname);
}
$output .= '
// ]]>
</script>';
return $output;
}

sub javascript_index_functions {
return <<"ENDJS";

function getFormIdByName(formname) {	function getFormIdByName(formname) {
for (var i=0;i<document.forms.length;i++) {	for (var i=0;i<document.forms.length;i++) {
if (document.forms[i].name == formname) {	if (document.forms[i].name == formname) {
return i;	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 -1;
}	}
return userdom;
}

ENDJS

}	function getIndexByName(formid,item) {
	for (var i=0;i<document.forms[formid].elements.length;i++) {
sub userbrowser_javascript {	if (document.forms[formid].elements[i].name == item) {
my $id_functions = &javascript_index_functions();	return i;
return <<"ENDUSERBRW";

function openuserbrowser(formname,uname,udom,ulast,ufirst,uemail,hideudom,crsdom) {
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;
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) {
var formid = getFormIdByName(formname);
if (formid > -1) {
var domid = getIndexByName(formid,udom);
var hidedomid = getIndexByName(formid,origdom);
if (hidedomid > -1) {
var fixeddom = document.forms[formid].elements[hidedomid].value;
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 -1;
}	}
return;	ENDSTDBRW
}	if ($sec_element ne '') {
	$output .= &setsec_javascript($sec_element,$formname);
$id_functions	}
ENDUSERBRW	$output .= '
	</script>';
	return $output;
}	}


sub setsec_javascript {	sub setsec_javascript {
my ($sec_element,$formname) = @_;	my ($sec_element,$formname) = @_;
my $setsections = qq\|	my $setsections = qq\|
Line 690 function setSect(sectionlist) {	Line 614 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.'");'
."'>".$linktext.'</a>'	."'>".&mt('Select Course').'</a>'
.'</span>';	.'</span>';
}	}

Line 709 sub selectauthor_link {	Line 629 sub selectauthor_link {
&mt('Select Author').'</a>';	&mt('Select Author').'</a>';
}	}

sub selectuser_link {
my ($form,$unameelem,$domelem,$lastelem,$firstelem,$emailelem,$hdomelem,
$coursedom,$linktext) = @_;
return '<a href="javascript:openuserbrowser('."'$form','$unameelem','$domelem',".
"'$lastelem','$firstelem','$emailelem','$hdomelem','$coursedom'".
');">'.$linktext.'</a>';
}

sub check_uncheck_jscript {	sub check_uncheck_jscript {
my $jscript = <<"ENDSCRT";	my $jscript = <<"ENDSCRT";
function checkAll(field) {	function checkAll(field) {
Line 917 sub linked_select_forms {	Line 829 sub linked_select_forms {
# output the javascript to do the changing	# output the javascript to do the changing
my $result = '';	my $result = '';
$result.='<script type="text/javascript" language="JavaScript">'."\n";	$result.='<script type="text/javascript" language="JavaScript">'."\n";
$result.="// <![CDATA[\n";
$result.="var select2data = new Object();\n";	$result.="var select2data = new Object();\n";
$" = '","';	$" = '","';
my $debug = '';	my $debug = '';
Line 963 function select1_changed() {	Line 874 function select1_changed() {
}	}
}	}
}	}
// ]]>
</script>	</script>
END	END
# output the initial values for the selection lists	# output the initial values for the selection lists
Line 1025 sub help_open_topic {	Line 935 sub help_open_topic {
my ($topic, $text, $stayOnPage, $width, $height) = @_;	my ($topic, $text, $stayOnPage, $width, $height) = @_;
$text = "" if (not defined $text);	$text = "" if (not defined $text);
$stayOnPage = 0 if (not defined $stayOnPage);	$stayOnPage = 0 if (not defined $stayOnPage);
if ($env{'browser.interface'} eq 'textual') {
$stayOnPage=1;
}
$width = 350 if (not defined $width);	$width = 350 if (not defined $width);
$height = 400 if (not defined $height);	$height = 400 if (not defined $height);
my $filename = $topic;	my $filename = $topic;
Line 1045 sub help_open_topic {	Line 952 sub help_open_topic {
}	}

# Add the text	# Add the text
if ($text ne "") {	if ($text ne "") {
$template .=	$template.='<span class="LC_help_open_topic">'
"<table bgcolor='#3333AA' cellspacing='1' cellpadding='1' border='0'><tr>".	.'<a target="_top" href="'.$link.'">'
"<td bgcolor='#5555FF'><span class=\"LC_nobreak\"><a target=\"_top\" href=\"$link\"><font color='#FFFFFF' size='2'>$text</font></a>";	.$text.'</a>';
}	}

# Add the graphic	# (Always) Add the graphic
my $title = &mt('Online Help');	my $title = &mt('Online Help');
my $helpicon=&lonhttpdurl("/adm/help/help.png");	my $helpicon=&lonhttpdurl("/adm/help/help.png");
$template .= '<a target="_top" href="'.$link.'" title="'.$title.'">'.	$template.=' <a target="_top" href="'.$link.'" title="'.$title.'">'
'<img src="'.$helpicon.'" border="0" alt="'.&mt('Help: [_1]',$topic).	.'<img src="'.$helpicon.'" border="0"'
'" title="'.$title.'" /></a>';	.' alt="'.&mt('Help: [_1]',$topic).'"'
if ($text ne '') {	.' title="'.$title.'"'
$template.='</span></td></tr></table>';	.' /></a>';
	if ($text ne "") {
	$template.='</span>';
}	}
return $template;	return $template;

Line 1071 sub helpLatexCheatsheet {	Line 980 sub helpLatexCheatsheet {
my $out;	my $out;
my $addOther = '';	my $addOther = '';
if ($topic) {	if ($topic) {
$addOther = &Apache::loncommon::help_open_topic($topic,$text,	$addOther = '<span>'.&Apache::loncommon::help_open_topic($topic,&mt($text),
undef, undef, 600) .	undef, undef, 600).
'</td><td>';	'</span> ';
}	}
$out = '<table><tr><td>'.	$out = '<span>' # Start cheatsheet
$addOther .	.$addOther
&Apache::loncommon::help_open_topic("Greek_Symbols",&mt('Greek Symbols'),	.'<span>'
undef,undef,600).	.&Apache::loncommon::help_open_topic('Greek_Symbols',&mt('Greek Symbols'),
'</td><td>'.	undef,undef,600)
&Apache::loncommon::help_open_topic("Other_Symbols",&mt('Other Symbols'),	.'</span> <span>'
undef,undef,600).	.&Apache::loncommon::help_open_topic('Other_Symbols',&mt('Other Symbols'),
'</td>';	undef,undef,600)
	.'</span>';
unless ($not_author) {	unless ($not_author) {
$out .= '<td>'.	$out .= ' <span>'
&Apache::loncommon::help_open_topic("Authoring_Output_Tags",&mt('Output Tags'),	.&Apache::loncommon::help_open_topic('Authoring_Output_Tags',&mt('Output Tags'),
undef,undef,600).	undef,undef,600)
'</td>';	.'</span>';
}	}
$out .= '</tr></table>';	$out .= '</span>'; # End cheatsheet
return $out;	return $out;
}	}

Line 1117 sub update_help_link {	Line 1027 sub update_help_link {
my $banner_link = "/adm/helpmenu?page=banner&topic=$topic&component_help=$component_help&faq=$faq&bug=$bug&origurl=$origurl&stamp=$timestamp&stayonpage=$stayOnPage";	my $banner_link = "/adm/helpmenu?page=banner&topic=$topic&component_help=$component_help&faq=$faq&bug=$bug&origurl=$origurl&stamp=$timestamp&stayonpage=$stayOnPage";
my $output .= <<"ENDOUTPUT";	my $output .= <<"ENDOUTPUT";
<script type="text/javascript">	<script type="text/javascript">
// <![CDATA[
banner_link = '$banner_link';	banner_link = '$banner_link';
// ]]>
</script>	</script>
ENDOUTPUT	ENDOUTPUT
return $output;	return $output;
Line 1132 sub help_open_menu {	Line 1040 sub help_open_menu {
$stayOnPage = 0 if (not defined $stayOnPage);	$stayOnPage = 0 if (not defined $stayOnPage);
# only use pop-up help (stayOnPage == 0)	# only use pop-up help (stayOnPage == 0)
# if environment.remote is on (using remote control UI)	# if environment.remote is on (using remote control UI)
if ($env{'browser.interface'} eq 'textual' \|\|	if ($env{'environment.remote'} eq 'off' ) {
$env{'environment.remote'} eq 'off' ) {
$stayOnPage=1;	$stayOnPage=1;
}	}
my $output;	my $output;
Line 1157 sub top_nav_help {	Line 1064 sub top_nav_help {
my ($text) = @_;	my ($text) = @_;
$text = &mt($text);	$text = &mt($text);
my $stay_on_page =	my $stay_on_page =
($env{'browser.interface'} eq 'textual' \|\|	($env{'environment.remote'} eq 'off' );
$env{'environment.remote'} eq 'off' );
my $link = ($stay_on_page) ? "javascript:helpMenu('display')"	my $link = ($stay_on_page) ? "javascript:helpMenu('display')"
: "javascript:helpMenu('open')";	: "javascript:helpMenu('open')";
my $banner_link = &update_help_link(undef,undef,undef,undef,$stay_on_page);	my $banner_link = &update_help_link(undef,undef,undef,undef,$stay_on_page);
Line 1175 sub help_menu_js {	Line 1081 sub help_menu_js {
my ($text) = @_;	my ($text) = @_;

my $stayOnPage =	my $stayOnPage =
($env{'browser.interface'} eq 'textual' \|\|	($env{'environment.remote'} eq 'off' );
$env{'environment.remote'} eq 'off' );

my $width = 620;	my $width = 620;
my $height = 600;	my $height = 600;
Line 1235 sub help_open_bug {	Line 1140 sub help_open_bug {
unless ($Apache::lonnet::perlvar{'BugzillaHost'}) { return ''; }	unless ($Apache::lonnet::perlvar{'BugzillaHost'}) { return ''; }
$text = "" if (not defined $text);	$text = "" if (not defined $text);
$stayOnPage = 0 if (not defined $stayOnPage);	$stayOnPage = 0 if (not defined $stayOnPage);
if ($env{'browser.interface'} eq 'textual' \|\|	if ($env{'environment.remote'} eq 'off' ) {
$env{'environment.remote'} eq 'off' ) {
$stayOnPage=1;	$stayOnPage=1;
}	}
$width = 600 if (not defined $width);	$width = 600 if (not defined $width);
Line 1260 sub help_open_bug {	Line 1164 sub help_open_bug {
{	{
$template .=	$template .=
"<table bgcolor='#AA3333' cellspacing='1' cellpadding='1' border='0'><tr>".	"<table bgcolor='#AA3333' cellspacing='1' cellpadding='1' border='0'><tr>".
"<td bgcolor='#FF5555'><a target=\"_top\" href=\"$link\"><font color='#FFFFFF' size='2'>$text</font></a>";	"<td bgcolor='#FF5555'><a target=\"_top\" href=\"$link\"><span style=\"color:#FFFFFF;font-size:10pt;\">$text</span></a>";
}	}

# Add the graphic	# Add the graphic
Line 1280 sub help_open_faq {	Line 1184 sub help_open_faq {
unless ($Apache::lonnet::perlvar{'FAQHost'}) { return ''; }	unless ($Apache::lonnet::perlvar{'FAQHost'}) { return ''; }
$text = "" if (not defined $text);	$text = "" if (not defined $text);
$stayOnPage = 0 if (not defined $stayOnPage);	$stayOnPage = 0 if (not defined $stayOnPage);
if ($env{'browser.interface'} eq 'textual' \|\|	if ($env{'environment.remote'} eq 'off' ) {
$env{'environment.remote'} eq 'off' ) {
$stayOnPage=1;	$stayOnPage=1;
}	}
$width = 350 if (not defined $width);	$width = 350 if (not defined $width);
Line 1305 sub help_open_faq {	Line 1208 sub help_open_faq {
{	{
$template .=	$template .=
"<table bgcolor='#337733' cellspacing='1' cellpadding='1' border='0'><tr>".	"<table bgcolor='#337733' cellspacing='1' cellpadding='1' border='0'><tr>".
"<td bgcolor='#448844'><a target=\"_top\" href=\"$link\"><font color='#FFFFFF' size='2'>$text</font></a>";	"<td bgcolor='#448844'><a target=\"_top\" href=\"$link\"><span style=\"color:#FFFFFF; font-size:10pt;\">$text</span></a>";
}	}

# Add the graphic	# Add the graphic
Line 1491 sub resize_textarea_js {	Line 1394 sub resize_textarea_js {
my $geometry = &viewport_geometry_js();	my $geometry = &viewport_geometry_js();
return <<"RESIZE";	return <<"RESIZE";
<script type="text/javascript">	<script type="text/javascript">
// <![CDATA[
$geometry	$geometry

function getX(element) {	function getX(element) {
Line 1530 function resize_textarea(textarea_id,bot	Line 1432 function resize_textarea(textarea_id,bot
}	}
textarea.style.height=new_height+'px';	textarea.style.height=new_height+'px';
}	}
// ]]>
</script>	</script>
RESIZE	RESIZE

Line 1874 sub select_level_form {	Line 1775 sub select_level_form {

=pod	=pod

=item * &select_dom_form($defdom,$name,$includeempty,$showdomdesc,$onchange)	=item * &select_dom_form($defdom,$name,$includeempty,$showdomdesc,$autosubmit)

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 1885 selected");	Line 1786 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.

The optional $onchange argument specifies what should occur if the domain selector is changed, e.g., 'this.form.submit()' if the form is to be automatically submitted.	If the $autosubmit flag is set, the form containing the domain selector will be auto-submitted by an onchange action.

=cut	=cut

#-------------------------------------------	#-------------------------------------------
sub select_dom_form {	sub select_dom_form {
my ($defdom,$name,$includeempty,$showdomdesc,$onchange) = @_;	my ($defdom,$name,$includeempty,$showdomdesc,$autosubmit) = @_;
if ($onchange) {	my $onchange;
$onchange = ' onchange="'.$onchange.'"';	if ($autosubmit) {
	$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 2397 sub authform_internal{	Line 2299 sub authform_internal{
$result = &mt	$result = &mt
('[_1] Internally authenticated (with initial password [_2])',	('[_1] Internally authenticated (with initial password [_2])',
'<label>'.$authtype,'</label>'.$autharg);	'<label>'.$authtype,'</label>'.$autharg);
$result.="<label><input type=\"checkbox\" name=\"visible\" onclick='if (this.checked) { this.form.intarg.type=\"text\" } else { this.form.intarg.type=\"password\" }' />".&mt('Visible input').'</label>';	$result.="<label><input type=\"checkbox\" name=\"visible\" onClick='if (this.checked) { this.form.intarg.type=\"text\" } else { this.form.intarg.type=\"password\" }' />".&mt('Visible input').'</label>';
return $result;	return $result;
}	}

Line 2911 sub screenname {	Line 2813 sub screenname {
return $names{'screenname'};	return $names{'screenname'};
}	}


# ------------------------------------------------------------- Confirm Wrapper	# ------------------------------------------------------------- Confirm Wrapper
=pod	=pod

Line 2941 sub messagewrapper {	Line 2844 sub messagewrapper {
'&subject='.&escape($subject).'&text='.&escape($text).'" '.	'&subject='.&escape($subject).'&text='.&escape($text).'" '.
'title="'.&mt('Send message').'">'.$link.'</a>';	'title="'.&mt('Send message').'">'.$link.'</a>';
}	}

# --------------------------------------------------------------- Notes Wrapper	# --------------------------------------------------------------- Notes Wrapper

sub noteswrapper {	sub noteswrapper {
Line 2948 sub noteswrapper {	Line 2852 sub noteswrapper {
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

sub aboutmewrapper {	sub aboutmewrapper {
Line 2961 sub aboutmewrapper {	Line 2866 sub aboutmewrapper {

# ------------------------------------------------------------ Syllabus Wrapper	# ------------------------------------------------------------ Syllabus Wrapper


sub syllabuswrapper {	sub syllabuswrapper {
my ($linktext,$coursedir,$domain,$fontcolor)=@_;	my ($linktext,$coursedir,$domain)=@_;
if ($fontcolor) {
$linktext='<font color="'.$fontcolor.'">'.$linktext.'</font>';
}
return qq{<a href="/public/$domain/$coursedir/syllabus">$linktext</a>};	return qq{<a href="/public/$domain/$coursedir/syllabus">$linktext</a>};
}	}

	# -----------------------------------------------------------------------------

sub track_student_link {	sub track_student_link {
my ($linktext,$sname,$sdom,$target,$start) = @_;	my ($linktext,$sname,$sdom,$target,$start) = @_;
my $link ="/adm/trackstudent?";	my $link ="/adm/trackstudent?";
Line 3271 sub user_lang {	Line 3174 sub user_lang {
return $user_lh;	return $user_lh;
}	}


###############################################################	###############################################################
## Student Answer Attempts ##	## Student Answer Attempts ##
###############################################################	###############################################################
Line 3986 sub blocking_status {	Line 3890 sub blocking_status {
&Apache::lonnet::coursedescription($course);	&Apache::lonnet::coursedescription($course);
$coursedesc = $courseinfo{'description'};	$coursedesc = $courseinfo{'description'};
}	}
$category = "Group portfolio files in the course '$coursedesc'";	$category = "Group portfolio in the course '$coursedesc'";
} else {	} else {
$category = 'Portfolio files belonging to ';	$category = 'Portfolio files belonging to ';
if ($env{'user.name'} eq 'public' &&	if ($env{'user.name'} eq 'public' &&
Line 4120 sub get_domainconf {	Line 4024 sub get_domainconf {
foreach my $key (keys(%{$domconfig{'login'}})) {	foreach my $key (keys(%{$domconfig{'login'}})) {
if (ref($domconfig{'login'}{$key}) eq 'HASH') {	if (ref($domconfig{'login'}{$key}) eq 'HASH') {
foreach my $img (keys(%{$domconfig{'login'}{$key}})) {	foreach my $img (keys(%{$domconfig{'login'}{$key}})) {
$designhash{$udom.'.login.'.$key.'_'.$img} =	$designhash{$udom.'.login.'.$key.'_'.$img} =
$domconfig{'login'}{$key}{$img};	$domconfig{'login'}{$key}{$img};
}	}
} else {	} else {
Line 4383 sub bodytag {	Line 4287 sub bodytag {

if ($bodyonly) {	if ($bodyonly) {
return $bodytag;	return $bodytag;
} elsif ($env{'browser.interface'} eq 'textual') {	}
# Accessibility

$bodytag.=&Apache::lonmenu::menubuttons($forcereg,$forcereg);
if (!$notitle) {
$bodytag.='<h1>LON-CAPA: '.$title.'</h1>';
}
return $bodytag;
}

my $name = &plainname($env{'user.name'},$env{'user.domain'});	my $name = &plainname($env{'user.name'},$env{'user.domain'});
if ($env{'user.name'} eq 'public' && $env{'user.domain'} eq 'public') {	if ($env{'user.name'} eq 'public' && $env{'user.domain'} eq 'public') {
Line 4415 $realm	Line 4311 $realm
</td>	</td>
ENDROLE	ENDROLE

my $titleinfo = '<span class="LC_title_bar_title">'.$title.'</span>';	my $titleinfo = '<h1>'.$title.'</h1>';
if ($customtitle) {	if ($customtitle) {
$titleinfo = $customtitle;	$titleinfo = $customtitle;
}	}
Line 4458 ENDROLE	Line 4354 ENDROLE
.'<b>'.&mt('Construction Space').'</b>: '	.'<b>'.&mt('Construction Space').'</b>: '
.'<form name="dirs" method="post" action="'.$formaction	.'<form name="dirs" method="post" action="'.$formaction
.'" target="_top"><tt><b>'	.'" target="_top"><tt><b>'
.&Apache::lonhtmlcommon::crumbs($uname.'/'.$parentpath,'_top','/priv','','+1',1)."<font size=\"+1\">$lastitem</font></b></tt><br />"	.&Apache::lonhtmlcommon::crumbs($uname.'/'.$parentpath,'_top','/priv','','+1',1)."<span class=\"LC_fontsize_big\">$lastitem</span></b></tt><br />"
.&Apache::lonhtmlcommon::select_recent('construct','recent','this.form.action=this.form.recent.value;this.form.submit()')	.&Apache::lonhtmlcommon::select_recent('construct','recent','this.form.action=this.form.recent.value;this.form.submit()')
.'</form>'	.'</form>'
.&Apache::lonmenu::constspaceform();	.&Apache::lonmenu::constspaceform();
Line 4474 ENDROLE	Line 4370 ENDROLE
if ($notopbar) {	if ($notopbar) {
$bodytag .= $titletable;	$bodytag .= $titletable;
} else {	} else {
	$bodytag .= qq\|<div id="head_userinfo">$name ($role) <br/>
	<em>$realm</em>$dc_info</div>\|;
if ($env{'request.state'} eq 'construct') {	if ($env{'request.state'} eq 'construct') {
$bodytag .= &Apache::lonmenu::menubuttons($forcereg,$forcereg,	$bodytag .= &Apache::lonmenu::menubuttons($forcereg,$forcereg,
$titletable);	$titletable);
Line 4505 ENDROLE	Line 4403 ENDROLE
return(<<ENDBODY);	return(<<ENDBODY);
$bodytag	$bodytag
<table id="LC_title_bar" class="LC_with_remote">	<table id="LC_title_bar" class="LC_with_remote">
<tr><td class="LC_title_bar_role_logo">$upperleft</td>	<tr><td>$upperleft</td>
<td class="LC_title_bar_domain_logo">$messages </td>	<td>$messages </td>
</tr>	</tr>
<tr><td>$titleinfo $dc_info $menu</td>	<tr><td>$titleinfo $dc_info $menu</td>
$roleinfo	$roleinfo
Line 4623 sub standard_css {	Line 4521 sub standard_css {
my $img = &designparm($function.'.img', $domain);	my $img = &designparm($function.'.img', $domain);
my $tabbg = &designparm($function.'.tabbg', $domain);	my $tabbg = &designparm($function.'.tabbg', $domain);
my $font = &designparm($function.'.font', $domain);	my $font = &designparm($function.'.font', $domain);
	my $fontmenu = &designparm($function.'.fontmenu', $domain);
	#second colour for later usage
my $sidebg = &designparm($function.'.sidebg',$domain);	my $sidebg = &designparm($function.'.sidebg',$domain);
my $pgbg_or_bgcolor =	my $pgbg_or_bgcolor =
$bgcolor \|\|	$bgcolor \|\|
Line 4632 sub standard_css {	Line 4532 sub standard_css {
my $vlink = &designparm($function.'.vlink', $domain);	my $vlink = &designparm($function.'.vlink', $domain);
my $link = &designparm($function.'.link', $domain);	my $link = &designparm($function.'.link', $domain);

	my $loginbg = &designparm('login.sidebg',$domain);
	my $bgcol = &designparm('login.bgcol',$domain);
	my $textcol = &designparm('login.textcol',$domain);

my $sans = 'Verdana,Arial,Helvetica,sans-serif';	my $sans = 'Verdana,Arial,Helvetica,sans-serif';
my $mono = 'monospace';	my $mono = 'monospace';
my $data_table_head = $sidebg;	my $data_table_head = $tabbg;
my $data_table_light = '#FAFAFA';	my $data_table_light = '#EEEEEE';
my $data_table_dark = '#F0F0F0';	my $data_table_dark = '#DDDDDD';
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 4649 sub standard_css {	Line 4553 sub standard_css {
my $mail_other_hover = '#669999';	my $mail_other_hover = '#669999';
my $table_header = '#DDDDDD';	my $table_header = '#DDDDDD';
my $feedback_link_bg = '#BBBBBB';	my $feedback_link_bg = '#BBBBBB';
my $lg_border_color = '#C8C8C8';	my $lg_border_color = '#C8C8C8';

my $border = ($env{'browser.type'} eq 'explorer' \|\|	my $border = ($env{'browser.type'} eq 'explorer' \|\|
$env{'browser.type'} eq 'safari' ) ? '0 2px 0 2px'	$env{'browser.type'} eq 'safari' ) ? '0 2px 0 2px'
Line 4657 sub standard_css {	Line 4561 sub standard_css {


return <<END;	return <<END;
h1, h2, h3, th { font-family: $sans }	body {
a:focus { color: red; background: yellow }	font-family: $sans;
	line-height:130%;
	font-size:0.83em;
	color:$font;
	}

hr {	a:link, a:visited {
clear: both;	font-size:100%;
color: $tabbg;
background-color: $tabbg;
height: 3px;
border: none;
}	}

table.thinborder,	a:focus {
	color: red;
	background: yellow
	}

	table.thinborder,
table.thinborder tr th {	table.thinborder tr th {
border-style: solid;	border-style: solid;
border-width: 1px;	border-width: 1px;
	border-color: $lg_border_color;
background: $tabbg;	background: $tabbg;
}	}

table.thinborder tr td {	table.thinborder tr td {
border-style: solid;	border-style: solid;
border-width: 1px	border-width: 1px;
	border-color: $lg_border_color;
	}

	form, .inline {
	display: inline;
	}

	.LC_right {
	text-align:right;
	}

	.LC_middle {
	vertical-align:middle;
	}

	/* just for tests */
	.LC_400Box {width:400px; }
	/* end */

	.LC_filename {
	font-family: $mono;
	white-space:pre;
	}

	.LC_fileicon {
	border: none;
	height: 1.3em;
	vertical-align: text-bottom;
	margin-right: 0.3em;
	text-decoration:none;
}	}

form, .inline { display: inline; }
.center { text-align: center; }
.LC_filename {font-family: $mono; white-space:pre;}
.LC_error {	.LC_error {
color: red;	color: red;
font-size: larger;	font-size: larger;
}	}

.LC_warning,	.LC_warning,
.LC_diff_removed {	.LC_diff_removed {
color: red;	color: red;
Line 4710 div.LC_confirm_box .LC_success img {	Line 4648 div.LC_confirm_box .LC_success img {
vertical-align: middle;	vertical-align: middle;
}	}

	.LC_unknown {
	color: yellow;
	}

.LC_icon {	.LC_icon {
border: none;	border: none;
	vertical-align: middle;
}	}

.LC_indexer_icon {	.LC_indexer_icon {
border: 0;	border: none;
height: 22px;	height: 22px;
}	}

.LC_docs_spacer {	.LC_docs_spacer {
width: 25px;	width: 25px;
height: 1px;	height: 1px;
Line 4727 div.LC_confirm_box .LC_success img {	Line 4672 div.LC_confirm_box .LC_success img {
color: #999999;	color: #999999;
}	}

	.LC_discussion {
	background: $tabbg;
	border: 1px solid black;
	margin: 2px;
	}

	.LC_disc_action_links_bar {
	background: $tabbg;
	font-family: $sans;
	border: none;
	margin: 4px;
	}

	.LC_disc_action_left {
	text-align: left;
	}

	.LC_disc_action_right {
	text-align: right;
	}

	.LC_disc_new_item {
	background: white;
	border: 2px solid red;
	margin: 2px;
	}

	.LC_disc_old_item {
	background: white;
	border: 1px solid black;
	margin: 2px;
	}

table.LC_pastsubmission {	table.LC_pastsubmission {
border: 1px solid black;	border: 1px solid black;
margin: 2px;	margin: 2px;
}	}

table#LC_top_nav, table#LC_menubuttons,table#LC_nav_location {	table#LC_top_nav,
	table#LC_menubuttons,
	table#LC_nav_location {
width: 100%;	width: 100%;
background: $pgbg;	background: $pgbg;
border: 2px;	border: 2px;
Line 4740 table#LC_top_nav, table#LC_menubuttons,t	Line 4720 table#LC_top_nav, table#LC_menubuttons,t
padding: 0;	padding: 0;
}	}

table#LC_title_bar, table.LC_breadcrumbs,	table#LC_title_bar a {
	color: $fontmenu;
	}

	table#LC_title_bar {
	/display: none;/
	}

	table#LC_title_bar,
	table.LC_breadcrumbs,
table#LC_title_bar.LC_with_remote {	table#LC_title_bar.LC_with_remote {
width: 100%;	width: 100%;
border-color: $pgbg;	border-color: $pgbg;
border-style: solid;	border-style: solid;
border-width: $border;	border-width: $border;

background: $pgbg;	background: $pgbg;
	color: $fontmenu;
font-family: $sans;	font-family: $sans;
border-collapse: collapse;	border-collapse: collapse;
padding: 0;	padding: 0;
Line 4765 table.LC_docs_path {	Line 4754 table.LC_docs_path {
table#LC_title_bar td {	table#LC_title_bar td {
background: $tabbg;	background: $tabbg;
}	}
table#LC_title_bar td.LC_title_bar_who {
	table#LC_title_bar .LC_title_bar_who {
background: $tabbg;	background: $tabbg;
color: $font;	color: $fontmenu;
font: small $sans;	font: small $sans;
text-align: right;	text-align: right;
	margin: 0;
}	}
span.LC_metadata {
font-family: $sans;	table#LC_title_bar .LC_title_bar_name {
}	margin: 0;
span.LC_title_bar_title {
font: bold x-large $sans;
}
table#LC_title_bar td.LC_title_bar_domain_logo {
background: $sidebg;
text-align: right;
padding: 0;
}	}
table#LC_title_bar td.LC_title_bar_role_logo {
background: $sidebg;	table#LC_title_bar .LC_title_bar_role {
padding: 0;	margin: 0;
}	}

table#LC_menubuttons_mainmenu {	table#LC_title_bar .LC_title_bar_realm {
width: 100%;
border: 0;
border-spacing: 1px;
padding: 0 1px;
margin: 0;	margin: 0;
border-collapse: separate;
}	}
table#LC_menubuttons img, table#LC_menubuttons_mainmenu img {
	span.LC_metadata {
	font-family: $sans;
	}

	table#LC_menubuttons img{
border: none;	border: none;
}	}

table#LC_top_nav td {	table#LC_top_nav td {
background: $tabbg;	background: $tabbg;
border: none;	border: none;
font-size: small;	font-size: small;
	vertical-align:top;
	padding:2px 5px 2px 5px;
}	}
table#LC_top_nav td a, div#LC_top_nav a {
	table#LC_top_nav td a,
	div#LC_top_nav a {
color: $font;	color: $font;
font-family: $sans;	font-family: $sans;
}	}

table#LC_top_nav td.LC_top_nav_logo {	table#LC_top_nav td.LC_top_nav_logo {
background: $tabbg;	background: $tabbg;
text-align: left;	text-align: left;
white-space: nowrap;	white-space: nowrap;
width: 31px;	width: 31px;
}	}

table#LC_top_nav td.LC_top_nav_logo img {	table#LC_top_nav td.LC_top_nav_logo img {
border: none;	border: none;
vertical-align: bottom;	vertical-align: bottom;
}	}

table#LC_top_nav td.LC_top_nav_exit,	table#LC_top_nav td.LC_top_nav_exit,
table#LC_top_nav td.LC_top_nav_help {	table#LC_top_nav td.LC_top_nav_help {
width: 2.0em;	width: 2.0em;
}	}

table#LC_top_nav td.LC_top_nav_login {	table#LC_top_nav td.LC_top_nav_login {
width: 4.0em;	width: 4.0em;
text-align: center;	text-align: center;
}	}
table.LC_breadcrumbs td, table.LC_docs_path td {
	table.LC_breadcrumbs td,
	table.LC_docs_path td {
background: $tabbg;	background: $tabbg;
color: $font;	color: $fontmenu;
font-family: $sans;	font-family: $sans;
font-size: smaller;	font-size: smaller;
}	}

table.LC_breadcrumbs td.LC_breadcrumbs_component,	table.LC_breadcrumbs td.LC_breadcrumbs_component,
table.LC_docs_path td.LC_docs_path_component {	table.LC_docs_path td.LC_docs_path_component {
background: $tabbg;	background: $tabbg;
color: $font;	color: $fontmenu;
font-family: $sans;	font-family: $sans;
font-size: larger;	font-size: larger;
text-align: right;	text-align: right;
}	}

td.LC_table_cell_checkbox {	td.LC_table_cell_checkbox {
text-align: center;	text-align: center;
}	}

table#LC_mainmenu td.LC_mainmenu_column {	table#LC_mainmenu td.LC_mainmenu_column {
vertical-align: top;	vertical-align: top;
}	}

	.LC_fontsize_small {
	font-size: 70%;
	}

	.LC_fontsize_medium {
	font-size: 85%;
	}

	.LC_fontsize_large {
	font-size: 120%;
	}

.LC_menubuttons_inline_text {	.LC_menubuttons_inline_text {
color: $font;	color: $font;
font-family: $sans;	font-family: $sans;
font-size: smaller;	font-size: 90%;
	padding-left:3px;
}	}

.LC_menubuttons_link {	.LC_menubuttons_link {
text-decoration: none;	text-decoration: none;
}	}
/2008--9-5: new menu style sheet.Changed category/
.LC_menubuttons_category {	.LC_menubuttons_category {
color: $font;	color: $font;
background: $pgbg;	background: $pgbg;
Line 4865 table#LC_mainmenu td.LC_mainmenu_column	Line 4876 table#LC_mainmenu td.LC_mainmenu_column
}	}

td.LC_menubuttons_text {	td.LC_menubuttons_text {
width: 90%;	color: $font;
color: $font;
font-family: $sans;
}

td.LC_menubuttons_img {
}	}

.LC_current_location {	.LC_current_location {
font-family: $sans;	font-family: $sans;
background: $tabbg;	background: $tabbg;
}	}

.LC_new_mail {	.LC_new_mail {
font-family: $sans;	font-family: $sans;
background: $tabbg;	background: $tabbg;
Line 4894 td.LC_menubuttons_img {	Line 4901 td.LC_menubuttons_img {
}	}

.LC_roleslog_note {	.LC_roleslog_note {
font-size: smaller;	font-size: small;
}	}

.LC_mail_functions {	.LC_mail_functions {
Line 4906 table.LC_aboutme_port {	Line 4913 table.LC_aboutme_port {
border-collapse: collapse;	border-collapse: collapse;
border-spacing: 0;	border-spacing: 0;
}	}
table.LC_data_table, table.LC_mail_list {
	table.LC_data_table,
	table.LC_mail_list {
border: 1px solid #000000;	border: 1px solid #000000;
border-collapse: separate;	border-collapse: separate;
border-spacing: 1px;	border-spacing: 1px;
background: $pgbg;	background: $pgbg;
}	}

.LC_data_table_dense {	.LC_data_table_dense {
font-size: small;	font-size: small;
}	}

table.LC_nested_outer {	table.LC_nested_outer {
border: 1px solid #000000;	border: 1px solid #000000;
border-collapse: collapse;	border-collapse: collapse;
border-spacing: 0;	border-spacing: 0;
width: 100%;	width: 100%;
}	}

table.LC_nested {	table.LC_nested {
border: none;	border: none;
border-collapse: collapse;	border-collapse: collapse;
border-spacing: 0;	border-spacing: 0;
width: 100%;	width: 100%;
}	}
table.LC_data_table tr th, table.LC_calendar tr th, table.LC_mail_list tr th,
	table.LC_data_table tr th,
	table.LC_calendar tr th,
	table.LC_mail_list tr th,
table.LC_prior_tries tr th {	table.LC_prior_tries tr th {
font-weight: bold;	font-weight: bold;
background-color: $data_table_head;	background-color: $data_table_head;
font-size: smaller;	color:$fontmenu;
	font-size:90%;
}	}

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;
text-align: left;	text-align: left;
}	}
table.LC_data_table tr.LC_odd_row > td,
	table.LC_data_table tr.LC_odd_row > td,
table.LC_pick_box tr > td.LC_odd_row,	table.LC_pick_box tr > td.LC_odd_row,
table.LC_aboutme_port tr td {	table.LC_aboutme_port tr td {
background-color: $data_table_light;	background-color: $data_table_light;
padding: 2px;	padding: 2px;
}	}

table.LC_data_table tr.LC_even_row > td,	table.LC_data_table tr.LC_even_row > td,
table.LC_pick_box tr > td.LC_even_row,	table.LC_pick_box tr > td.LC_even_row,
table.LC_aboutme_port tr.LC_even_row td {	table.LC_aboutme_port tr.LC_even_row td {
background-color: $data_table_dark;	background-color: $data_table_dark;
padding: 2px;	padding: 2px;
}	}

table.LC_data_table tr.LC_data_table_highlight td {	table.LC_data_table tr.LC_data_table_highlight td {
background-color: $data_table_darker;	background-color: $data_table_darker;
}	}

table.LC_data_table tr td.LC_leftcol_header {	table.LC_data_table tr td.LC_leftcol_header {
background-color: $data_table_head;	background-color: $data_table_head;
font-weight: bold;	font-weight: bold;
}	}

table.LC_data_table tr.LC_empty_row td,	table.LC_data_table tr.LC_empty_row td,
table.LC_nested tr.LC_empty_row td {	table.LC_nested tr.LC_empty_row td {
background-color: #FFFFFF;	background-color: #FFFFFF;
Line 4965 table.LC_nested tr.LC_empty_row td {	Line 4987 table.LC_nested tr.LC_empty_row td {
text-align: center;	text-align: center;
padding: 8px;	padding: 8px;
}	}

table.LC_nested tr.LC_empty_row td {	table.LC_nested tr.LC_empty_row td {
padding: 4ex	padding: 4ex
}	}

table.LC_nested_outer tr th {	table.LC_nested_outer tr th {
font-weight: bold;	font-weight: bold;
	color:$fontmenu;
background-color: $data_table_head;	background-color: $data_table_head;
font-size: smaller;	font-size: small;
border-bottom: 1px solid #000000;	border-bottom: 1px solid #000000;
}	}

table.LC_nested_outer tr td.LC_subheader {	table.LC_nested_outer tr td.LC_subheader {
background-color: $data_table_head;	background-color: $data_table_head;
font-weight: bold;	font-weight: bold;
Line 4981 table.LC_nested_outer tr td.LC_subheader	Line 5007 table.LC_nested_outer tr td.LC_subheader
border-bottom: 1px solid #000000;	border-bottom: 1px solid #000000;
text-align: right;	text-align: right;
}	}

table.LC_nested tr.LC_info_row td {	table.LC_nested tr.LC_info_row td {
background-color: #CCCCCC;	background-color: #CCCCCC;
font-weight: bold;	font-weight: bold;
font-size: small;	font-size: small;
text-align: center;	text-align: center;
}	}

table.LC_nested tr.LC_info_row td.LC_left_item,	table.LC_nested tr.LC_info_row td.LC_left_item,
table.LC_nested_outer tr th.LC_left_item {	table.LC_nested_outer tr th.LC_left_item {
text-align: left;	text-align: left;
}	}

table.LC_nested td {	table.LC_nested td {
background-color: #FFFFFF;	background-color: #FFFFFF;
font-size: small;	font-size: small;
}	}

table.LC_nested_outer tr th.LC_right_item,	table.LC_nested_outer tr th.LC_right_item,
table.LC_nested tr.LC_info_row td.LC_right_item,	table.LC_nested tr.LC_info_row td.LC_right_item,
table.LC_nested tr.LC_odd_row td.LC_right_item,	table.LC_nested tr.LC_odd_row td.LC_right_item,
Line 5010 table.LC_createuser {	Line 5040 table.LC_createuser {
}	}

table.LC_createuser tr.LC_section_row td {	table.LC_createuser tr.LC_section_row td {
font-size: smaller;	font-size: small;
}	}

table.LC_createuser tr.LC_info_row td {	table.LC_createuser tr.LC_info_row td {
Line 5023 table.LC_calendar {	Line 5053 table.LC_calendar {
border: 1px solid #000000;	border: 1px solid #000000;
border-collapse: collapse;	border-collapse: collapse;
}	}

table.LC_calendar_pickdate {	table.LC_calendar_pickdate {
font-size: xx-small;	font-size: xx-small;
}	}

table.LC_calendar tr td {	table.LC_calendar tr td {
border: 1px solid #000000;	border: 1px solid #000000;
vertical-align: top;	vertical-align: top;
}	}

table.LC_calendar tr td.LC_calendar_day_empty {	table.LC_calendar tr td.LC_calendar_day_empty {
background-color: $data_table_dark;	background-color: $data_table_dark;
}	}

table.LC_calendar tr td.LC_calendar_day_current {	table.LC_calendar tr td.LC_calendar_day_current {
background-color: $data_table_highlight;	background-color: $data_table_highlight;
}	}
Line 5040 table.LC_calendar tr td.LC_calendar_day_	Line 5074 table.LC_calendar tr td.LC_calendar_day_
table.LC_mail_list tr.LC_mail_new {	table.LC_mail_list tr.LC_mail_new {
background-color: $mail_new;	background-color: $mail_new;
}	}

table.LC_mail_list tr.LC_mail_new:hover {	table.LC_mail_list tr.LC_mail_new:hover {
background-color: $mail_new_hover;	background-color: $mail_new_hover;
}	}

	table.LC_mail_list tr.LC_mail_even {
	}

	table.LC_mail_list tr.LC_mail_odd {
	}

table.LC_mail_list tr.LC_mail_read {	table.LC_mail_list tr.LC_mail_read {
background-color: $mail_read;	background-color: $mail_read;
}	}

table.LC_mail_list tr.LC_mail_read:hover {	table.LC_mail_list tr.LC_mail_read:hover {
background-color: $mail_read_hover;	background-color: $mail_read_hover;
}	}

table.LC_mail_list tr.LC_mail_replied {	table.LC_mail_list tr.LC_mail_replied {
background-color: $mail_replied;	background-color: $mail_replied;
}	}

table.LC_mail_list tr.LC_mail_replied:hover {	table.LC_mail_list tr.LC_mail_replied:hover {
background-color: $mail_replied_hover;	background-color: $mail_replied_hover;
}	}

table.LC_mail_list tr.LC_mail_other {	table.LC_mail_list tr.LC_mail_other {
background-color: $mail_other;	background-color: $mail_other;
}	}

table.LC_mail_list tr.LC_mail_other:hover {	table.LC_mail_list tr.LC_mail_other:hover {
background-color: $mail_other_hover;	background-color: $mail_other_hover;
}	}
table.LC_mail_list tr.LC_mail_even {
}
table.LC_mail_list tr.LC_mail_odd {
}

	table.LC_data_table tr > td.LC_browser_file,
table#LC_portfolio_actions {	table.LC_data_table tr > td.LC_browser_file_published {
width: auto;
background: $pgbg;
border: none;
border-spacing: 2px 2px;
padding: 0;
margin: 0;
border-collapse: separate;
}
table#LC_portfolio_actions td.LC_label {
background: $tabbg;
text-align: right;
}
table#LC_portfolio_actions td.LC_value {
background: $tabbg;
}

table#LC_cstr_controls {
width: 100%;
border-collapse: collapse;
}
table#LC_cstr_controls tr td {
border: 4px solid $pgbg;
padding: 4px;
text-align: center;
background: $tabbg;
}
table#LC_cstr_controls tr th {
border: 4px solid $pgbg;
background: $table_header;
text-align: center;
font-family: $sans;
font-size: smaller;
}

table#LC_browser {

}
table#LC_browser tr th {
background: $table_header;
}
table#LC_browser tr td {
padding: 2px;
}
table#LC_browser tr.LC_browser_file,
table#LC_browser tr.LC_browser_file_published {
background: #CCFF88;	background: #CCFF88;
}	}
table#LC_browser tr.LC_browser_file_locked,
table#LC_browser tr.LC_browser_file_unpublished {	table.LC_data_table tr > td.LC_browser_file_locked,
	table.LC_data_table tr > td.LC_browser_file_unpublished {
background: #FFAA99;	background: #FFAA99;
}	}
table#LC_browser tr.LC_browser_file_obsolete {
	table.LC_data_table tr > td.LC_browser_file_obsolete {
background: #AAAAAA;	background: #AAAAAA;
}	}
table#LC_browser tr.LC_browser_file_modified,
table#LC_browser tr.LC_browser_file_metamodified {	table.LC_data_table tr > td.LC_browser_file_modified,
	table.LC_data_table tr > td.LC_browser_file_metamodified {
background: #FFFF77;	background: #FFFF77;
}	}
table#LC_browser tr.LC_browser_folder {
	table.LC_data_table tr.LC_browser_folder > td {
background: #CCCCFF;	background: #CCCCFF;
}	}

table.LC_data_table tr > td.LC_roles_is {	table.LC_data_table tr > td.LC_roles_is {
/* background: #77FF77; */	/* background: #77FF77; */
}	}

table.LC_data_table tr > td.LC_roles_future {	table.LC_data_table tr > td.LC_roles_future {
background: #FFFF77;	background: #FFFF77;
}	}

table.LC_data_table tr > td.LC_roles_will {	table.LC_data_table tr > td.LC_roles_will {
background: #FFAA77;	background: #FFAA77;
}	}

table.LC_data_table tr > td.LC_roles_expired {	table.LC_data_table tr > td.LC_roles_expired {
background: #FF7777;	background: #FF7777;
}	}

table.LC_data_table tr > td.LC_roles_will_not {	table.LC_data_table tr > td.LC_roles_will_not {
background: #AAFF77;	background: #AAFF77;
}	}

table.LC_data_table tr > td.LC_roles_selected {	table.LC_data_table tr > td.LC_roles_selected {
background: #11CC55;	background: #11CC55;
}	}

span.LC_current_location {	span.LC_current_location {
font-size: x-large;	font-size:larger;
background: $pgbg;	background: $pgbg;
}	}

Line 5158 span.LC_parm_menu_item {	Line 5165 span.LC_parm_menu_item {
font-size: larger;	font-size: larger;
font-family: $sans;	font-family: $sans;
}	}

span.LC_parm_scope_all {	span.LC_parm_scope_all {
color: red;	color: red;
}	}

span.LC_parm_scope_folder {	span.LC_parm_scope_folder {
color: green;	color: green;
}	}

span.LC_parm_scope_resource {	span.LC_parm_scope_resource {
color: orange;	color: orange;
}	}

span.LC_parm_part {	span.LC_parm_part {
color: blue;	color: blue;
}	}

span.LC_parm_folder, span.LC_parm_symb {	span.LC_parm_folder, span.LC_parm_symb {
font-size: x-small;	font-size: x-small;
font-family: $mono;	font-family: $mono;
color: #AAAAAA;	color: #AAAAAA;
}	}

td.LC_parm_overview_level_menu, td.LC_parm_overview_map_menu,	td.LC_parm_overview_level_menu,
td.LC_parm_overview_parm_selectors, td.LC_parm_overview_parm_restrictions {	td.LC_parm_overview_map_menu,
	td.LC_parm_overview_parm_selectors,
	td.LC_parm_overview_restrictions {
border: 1px solid black;	border: 1px solid black;
border-collapse: collapse;	border-collapse: collapse;
}	}

table.LC_parm_overview_restrictions td {	table.LC_parm_overview_restrictions td {
border-width: 1px 4px 1px 4px;	border-width: 1px 4px 1px 4px;
border-style: solid;	border-style: solid;
border-color: $pgbg;	border-color: $pgbg;
text-align: center;	text-align: center;
}	}

table.LC_parm_overview_restrictions th {	table.LC_parm_overview_restrictions th {
background: $tabbg;	background: $tabbg;
border-width: 1px 4px 1px 4px;	border-width: 1px 4px 1px 4px;
border-style: solid;	border-style: solid;
border-color: $pgbg;	border-color: $pgbg;
}	}

table#LC_helpmenu {	table#LC_helpmenu {
border: none;	border: none;
height: 55px;	height: 55px;
Line 5203 table#LC_helpmenu fieldset legend {	Line 5220 table#LC_helpmenu fieldset legend {
font-size: larger;	font-size: larger;
font-weight: bold;	font-weight: bold;
}	}

table#LC_helpmenu_links {	table#LC_helpmenu_links {
width: 100%;	width: 100%;
border: 1px solid black;	border: 1px solid black;
Line 5210 table#LC_helpmenu_links {	Line 5228 table#LC_helpmenu_links {
padding: 0;	padding: 0;
border-spacing: 1px;	border-spacing: 1px;
}	}

table#LC_helpmenu_links tr td {	table#LC_helpmenu_links tr td {
padding: 1px;	padding: 1px;
background: $tabbg;	background: $tabbg;
Line 5217 table#LC_helpmenu_links tr td {	Line 5236 table#LC_helpmenu_links tr td {
font-weight: bold;	font-weight: bold;
}	}

table#LC_helpmenu_links a:link, table#LC_helpmenu_links a:visited,	table#LC_helpmenu_links a:link,
	table#LC_helpmenu_links a:visited,
table#LC_helpmenu_links a:active {	table#LC_helpmenu_links a:active {
text-decoration: none;	text-decoration: none;
color: $font;	color: $font;
}	}

table#LC_helpmenu_links a:hover {	table#LC_helpmenu_links a:hover {
text-decoration: underline;	text-decoration: underline;
color: $vlink;	color: $vlink;
Line 5231 table#LC_helpmenu_links a:hover {	Line 5252 table#LC_helpmenu_links a:hover {
border: 1px solid #339933;	border: 1px solid #339933;
margin: -1px;	margin: -1px;
}	}

.LC_chrt_popup_up {	.LC_chrt_popup_up {
border: 1px solid yellow;	border: 1px solid yellow;
margin: -1px;	margin: -1px;
}	}

.LC_chrt_popup {	.LC_chrt_popup {
border: 1px solid #8888FF;	border: 1px solid #8888FF;
background: #CCCCFF;	background: #CCCCFF;
}	}

table.LC_pick_box {	table.LC_pick_box {
border-collapse: separate;	border-collapse: separate;
background: white;	background: white;
border: 1px solid black;	border: 1px solid black;
border-spacing: 1px;	border-spacing: 1px;
}	}

table.LC_pick_box td.LC_pick_box_title {	table.LC_pick_box td.LC_pick_box_title {
background: $sidebg;	background: $tabbg;
font-weight: bold;	font-weight: bold;
text-align: right;	text-align: right;
vertical-align: top;	vertical-align: top;
width: 184px;	width: 184px;
padding: 8px;	padding: 8px;
}	}

table.LC_pick_box td.LC_selfenroll_pick_box_title {	table.LC_pick_box td.LC_selfenroll_pick_box_title {
background: $sidebg;	background: $tabbg;
font-weight: bold;	font-weight: bold;
text-align: right;	text-align: right;
width: 350px;	width: 350px;
Line 5265 table.LC_pick_box td.LC_pick_box_value {	Line 5291 table.LC_pick_box td.LC_pick_box_value {
text-align: left;	text-align: left;
padding: 8px;	padding: 8px;
}	}

table.LC_pick_box td.LC_pick_box_select {	table.LC_pick_box td.LC_pick_box_select {
text-align: left;	text-align: left;
padding: 8px;	padding: 8px;
}	}

table.LC_pick_box td.LC_pick_box_separator {	table.LC_pick_box td.LC_pick_box_separator {
padding: 0;	padding: 0;
height: 1px;	height: 1px;
background: black;	background: black;
}	}

table.LC_pick_box td.LC_pick_box_submit {	table.LC_pick_box td.LC_pick_box_submit {
text-align: right;	text-align: right;
}	}

table.LC_pick_box td.LC_evenrow_value {	table.LC_pick_box td.LC_evenrow_value {
text-align: left;	text-align: left;
padding: 8px;	padding: 8px;
background-color: $data_table_light;	background-color: $data_table_light;
}	}

table.LC_pick_box td.LC_oddrow_value {	table.LC_pick_box td.LC_oddrow_value {
text-align: left;	text-align: left;
padding: 8px;	padding: 8px;
background-color: $data_table_light;	background-color: $data_table_light;
}	}

table.LC_helpform_receipt {	table.LC_helpform_receipt {
width: 620px;	width: 620px;
border-collapse: separate;	border-collapse: separate;
Line 5294 table.LC_helpform_receipt {	Line 5326 table.LC_helpform_receipt {
border: 1px solid black;	border: 1px solid black;
border-spacing: 1px;	border-spacing: 1px;
}	}

table.LC_helpform_receipt td.LC_pick_box_title {	table.LC_helpform_receipt td.LC_pick_box_title {
background: $tabbg;	background: $tabbg;
font-weight: bold;	font-weight: bold;
Line 5301 table.LC_helpform_receipt td.LC_pick_box	Line 5334 table.LC_helpform_receipt td.LC_pick_box
width: 184px;	width: 184px;
padding: 8px;	padding: 8px;
}	}

table.LC_helpform_receipt td.LC_evenrow_value {	table.LC_helpform_receipt td.LC_evenrow_value {
text-align: left;	text-align: left;
padding: 8px;	padding: 8px;
background-color: $data_table_light;	background-color: $data_table_light;
}	}

table.LC_helpform_receipt td.LC_oddrow_value {	table.LC_helpform_receipt td.LC_oddrow_value {
text-align: left;	text-align: left;
padding: 8px;	padding: 8px;
background-color: $data_table_light;	background-color: $data_table_light;
}	}

table.LC_helpform_receipt td.LC_pick_box_separator {	table.LC_helpform_receipt td.LC_pick_box_separator {
padding: 0;	padding: 0;
height: 1px;	height: 1px;
background: black;	background: black;
}	}

span.LC_helpform_receipt_cat {	span.LC_helpform_receipt_cat {
font-weight: bold;	font-weight: bold;
}	}

table.LC_group_priv_box {	table.LC_group_priv_box {
background: white;	background: white;
border: 1px solid black;	border: 1px solid black;
border-spacing: 1px;	border-spacing: 1px;
}	}

table.LC_group_priv_box td.LC_pick_box_title {	table.LC_group_priv_box td.LC_pick_box_title {
background: $tabbg;	background: $tabbg;
font-weight: bold;	font-weight: bold;
text-align: right;	text-align: right;
width: 184px;	width: 184px;
}	}

table.LC_group_priv_box td.LC_groups_fixed {	table.LC_group_priv_box td.LC_groups_fixed {
background: $data_table_light;	background: $data_table_light;
text-align: center;	text-align: center;
}	}

table.LC_group_priv_box td.LC_groups_optional {	table.LC_group_priv_box td.LC_groups_optional {
background: $data_table_dark;	background: $data_table_dark;
text-align: center;	text-align: center;
}	}

table.LC_group_priv_box td.LC_groups_functionality {	table.LC_group_priv_box td.LC_groups_functionality {
background: $data_table_darker;	background: $data_table_darker;
text-align: center;	text-align: center;
font-weight: bold;	font-weight: bold;
}	}

table.LC_group_priv td {	table.LC_group_priv td {
text-align: left;	text-align: left;
padding: 0;	padding: 0;
Line 5353 table.LC_notify_front_page {	Line 5396 table.LC_notify_front_page {
border: 1px solid black;	border: 1px solid black;
padding: 8px;	padding: 8px;
}	}

table.LC_notify_front_page td {	table.LC_notify_front_page td {
padding: 8px;	padding: 8px;
}	}

.LC_navbuttons {	.LC_navbuttons {
margin: 2ex 0ex 2ex 0ex;	margin: 2ex 0ex 2ex 0ex;
}	}

.LC_topic_bar {	.LC_topic_bar {
font-family: $sans;	font-family: $sans;
font-weight: bold;	font-weight: bold;
Line 5368 table.LC_notify_front_page td {	Line 5414 table.LC_notify_front_page td {
margin: 2ex 0ex 2ex 0ex;	margin: 2ex 0ex 2ex 0ex;
padding: 3px;	padding: 3px;
}	}

.LC_topic_bar span {	.LC_topic_bar span {
vertical-align: middle;	vertical-align: middle;
}	}

.LC_topic_bar img {	.LC_topic_bar img {
vertical-align: bottom;	vertical-align: bottom;
}	}

table.LC_course_group_status {	table.LC_course_group_status {
margin: 20px;	margin: 20px;
}	}

table.LC_status_selector td {	table.LC_status_selector td {
vertical-align: top;	vertical-align: top;
text-align: center;	text-align: center;
padding: 4px;	padding: 4px;
}	}
table.LC_descriptive_input td.LC_description {
vertical-align: top;
text-align: right;
font-weight: bold;
}
div.LC_feedback_link {	div.LC_feedback_link {
clear: both;	clear: both;
background: white;	background: white;
width: 100%;	width: 100%;
}	}

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;
Line 5414 table.LC_prior_tries td {	Line 5462 table.LC_prior_tries td {
}	}

.LC_answer_correct {	.LC_answer_correct {
background: #AAFFAA;	background: lightgreen;
color: black;	font-family: $sans;
	color: darkgreen;
	padding: 6px;
}	}

.LC_answer_charged_try {	.LC_answer_charged_try {
background: #FFAAAA ! important;	background: #FFAAAA;
color: black;	font-family: $sans;
	color: darkred;
	padding: 6px;
}	}
.LC_answer_not_charged_try,
	.LC_answer_not_charged_try,
.LC_answer_no_grade,	.LC_answer_no_grade,
.LC_answer_late {	.LC_answer_late {
background: #FFFFAA;	background: lightyellow;
	font-family: $sans;
color: black;	color: black;
	padding: 6px;
}	}

.LC_answer_previous {	.LC_answer_previous {
background: #AAAAFF;	background: lightblue;
color: black;	font-family: $sans;
	color: darkblue;
	padding: 6px;
}	}

.LC_answer_no_message {	.LC_answer_no_message {
background: #FFFFFF;	background: #FFFFFF;
	font-family: $sans;
color: black;	color: black;
	padding: 6px;
}	}

.LC_answer_unknown {	.LC_answer_unknown {
background: orange;	background: orange;
	font-family: $sans;
color: black;	color: black;
	padding: 6px;
}	}


span.LC_prior_numerical,	span.LC_prior_numerical,
span.LC_prior_string,	span.LC_prior_string,
span.LC_prior_custom,	span.LC_prior_custom,
Line 5459 table.LC_prior_option {	Line 5523 table.LC_prior_option {
width: 100%;	width: 100%;
border-collapse: collapse;	border-collapse: collapse;
}	}
table.LC_prior_rank, table.LC_prior_match {
	table.LC_prior_rank,
	table.LC_prior_match {
border-collapse: collapse;	border-collapse: collapse;
}	}

table.LC_prior_option tr td,	table.LC_prior_option tr td,
table.LC_prior_rank tr td,	table.LC_prior_rank tr td,
table.LC_prior_match tr td {	table.LC_prior_match tr td {
border: 1px solid #000000;	border: 1px solid #000000;
}	}

	td.LC_nobreak,
span.LC_nobreak {	span.LC_nobreak {
white-space: nowrap;	white-space: nowrap;
}	}
Line 5492 table.LC_docs_documents td.LC_docs_docum	Line 5560 table.LC_docs_documents td.LC_docs_docum
padding: 4px;	padding: 4px;
}	}

.LC_docs_course_commands div {
float: left;
border: 4px solid #AAAAAA;
padding: 4px;
background: #DDDDCC;
}

.LC_docs_entry_move {	.LC_docs_entry_move {
border: none;	border: none;
border-collapse: collapse;	border-collapse: collapse;
Line 5513 table.LC_docs_documents td.LC_docs_docum	Line 5574 table.LC_docs_documents td.LC_docs_docum
background: #DDDDDD;	background: #DDDDDD;
font-size: x-small;	font-size: x-small;
}	}

.LC_docs_copy {	.LC_docs_copy {
color: #000099;	color: #000099;
}	}

.LC_docs_cut {	.LC_docs_cut {
color: #550044;	color: #550044;
}	}

.LC_docs_rename {	.LC_docs_rename {
color: #009900;	color: #009900;
}	}

.LC_docs_remove {	.LC_docs_remove {
color: #990000;	color: #990000;
}	}
Line 5535 table.LC_docs_documents td.LC_docs_docum	Line 5600 table.LC_docs_documents td.LC_docs_docum
.LC_docs_editor td.LC_docs_entry_icon {	.LC_docs_editor td.LC_docs_entry_icon {
background: #FFFFBB;	background: #FFFFBB;
}	}

.LC_docs_editor td.LC_docs_entry_parameter {	.LC_docs_editor td.LC_docs_entry_parameter {
background: #BBBBFF;	background: #BBBBFF;
font-size: x-small;	font-size: x-small;
Line 5551 table.LC_docs_adddocs th {	Line 5617 table.LC_docs_adddocs th {
table.LC_sty_begin {	table.LC_sty_begin {
background: #BBFFBB;	background: #BBFFBB;
}	}

table.LC_sty_end {	table.LC_sty_end {
background: #FFBBBB;	background: #FFBBBB;
}	}
Line 5571 table.LC_double_column tr td.LC_left_col	Line 5638 table.LC_double_column tr td.LC_left_col

table.LC_double_column tr td.LC_right_col {	table.LC_double_column tr td.LC_right_col {
top: 2px;	top: 2px;
right: 2px;	right: 2px;
width: 47%;	width: 47%;
vertical-align: top;	vertical-align: top;
}	}
Line 5595 div.LC_clear_float_footer {	Line 5662 div.LC_clear_float_footer {
clear: both;	clear: both;
}	}


div.LC_grade_select_mode {
font-family: $sans;
}
div.LC_grade_select_mode div div {
margin: 5px;
}
div.LC_grade_select_mode_selector {
margin: 5px;
float: left;
}
div.LC_grade_select_mode_selector_header {
font: bold medium $sans;
}
div.LC_grade_select_mode_type {
clear: left;
}

div.LC_grade_show_user {	div.LC_grade_show_user {
margin-top: 20px;	margin-top: 20px;
border: 1px solid black;	border: 1px solid black;
}	}

div.LC_grade_user_name {	div.LC_grade_user_name {
background: #DDDDEE;	background: #DDDDEE;
border-bottom: 1px solid black;	border-bottom: 1px solid black;
font: bold large $sans;	font-weight: bold;
	font-size: large;
}	}

div.LC_grade_show_user_odd_row div.LC_grade_user_name {	div.LC_grade_show_user_odd_row div.LC_grade_user_name {
background: #DDEEDD;	background: #DDEEDD;
}	}
Line 5635 div.LC_grade_assign {	Line 5687 div.LC_grade_assign {
width: 99%;	width: 99%;
background: #FFFFFF;	background: #FFFFFF;
}	}

div.LC_grade_show_problem_header,	div.LC_grade_show_problem_header,
div.LC_grade_submissions_header,	div.LC_grade_submissions_header,
div.LC_grade_message_center_header,	div.LC_grade_message_center_header,
div.LC_grade_assign_header {	div.LC_grade_assign_header {
font: bold large $sans;	font-weight: bold;
	font-size: large;
}	}

div.LC_grade_show_problem_problem,	div.LC_grade_show_problem_problem,
div.LC_grade_submissions_body,	div.LC_grade_submissions_body,
div.LC_grade_message_center_body,	div.LC_grade_message_center_body,
Line 5649 div.LC_grade_assign_body {	Line 5704 div.LC_grade_assign_body {
width: 99%;	width: 99%;
background: #FFFFFF;	background: #FFFFFF;
}	}

span.LC_grade_check_note {	span.LC_grade_check_note {
font: normal medium $sans;	font-weight: normal;
	font-size: medium;
display: inline;	display: inline;
position: absolute;	position: absolute;
right: 1em;	right: 1em;
Line 5659 span.LC_grade_check_note {	Line 5716 span.LC_grade_check_note {
table.LC_scantron_action {	table.LC_scantron_action {
width: 100%;	width: 100%;
}	}

table.LC_scantron_action tr th {	table.LC_scantron_action tr th {
font: normal bold $sans;	font-weight:bold;
	font-style:normal;
}	}

div.LC_edit_problem_header,	.LC_edit_problem_header,
div.LC_edit_problem_footer {	div.LC_edit_problem_footer {
font: normal medium $sans;	font-weight: normal;
	font-size: medium;
margin: 2px;	margin: 2px;
}	}

div.LC_edit_problem_header,	div.LC_edit_problem_header,
div.LC_edit_problem_header div,	div.LC_edit_problem_header div,
div.LC_edit_problem_footer,	div.LC_edit_problem_footer,
Line 5676 div.LC_edit_problem_editxml_header,	Line 5737 div.LC_edit_problem_editxml_header,
div.LC_edit_problem_editxml_header div {	div.LC_edit_problem_editxml_header div {
margin-top: 5px;	margin-top: 5px;
}	}

div.LC_edit_problem_header_edit_row {	div.LC_edit_problem_header_edit_row {
background: $tabbg;	background: $tabbg;
padding: 3px;	padding: 3px;
margin-bottom: 5px;	margin-bottom: 5px;
}	}

div.LC_edit_problem_header_title {	div.LC_edit_problem_header_title {
font: larger bold $sans;	font-weight: bold;
	font-size: larger;
background: $tabbg;	background: $tabbg;
padding: 3px;	padding: 3px;
}	}

table.LC_edit_problem_header_title {	table.LC_edit_problem_header_title {
font: larger bold $sans;	font-size: larger;
	font-weight: bold;
width: 100%;	width: 100%;
border-color: $pgbg;	border-color: $pgbg;
border-style: solid;	border-style: solid;
border-width: $border;	border-width: $border;

background: $tabbg;	background: $tabbg;
border-collapse: collapse;	border-collapse: collapse;
padding: 0;	padding: 0;
Line 5702 div.LC_edit_problem_discards {	Line 5767 div.LC_edit_problem_discards {
float: left;	float: left;
padding-bottom: 5px;	padding-bottom: 5px;
}	}

div.LC_edit_problem_saves {	div.LC_edit_problem_saves {
float: right;	float: right;
padding-bottom: 5px;	padding-bottom: 5px;
}	}

hr.LC_edit_problem_divide {	hr.LC_edit_problem_divide {
clear: both;	clear: both;
color: $tabbg;	color: $tabbg;
Line 5713 hr.LC_edit_problem_divide {	Line 5780 hr.LC_edit_problem_divide {
height: 3px;	height: 3px;
border: none;	border: none;
}	}

img.stift{	img.stift{
border-width:0;	border-width: 0;
vertical-align:middle;	vertical-align: middle;
}	}

table#LC_mainmenu{	table#LC_mainmenu{
margin-top:10px;	margin-top:10px;
width:80%;	width:80%;

}	}

table#LC_mainmenu td.LC_mainmenu_col_fieldset{	table#LC_mainmenu td.LC_mainmenu_col_fieldset{
vertical-align: top;	vertical-align: top;
width: 45%;	width: 45%;
}	}

.LC_mainmenu_fieldset_category {	.LC_mainmenu_fieldset_category {
color: $font;	color: $font;
background: $pgbg;	background: $pgbg;
Line 5735 table#LC_mainmenu td.LC_mainmenu_col_fie	Line 5803 table#LC_mainmenu td.LC_mainmenu_col_fie
font-size: small;	font-size: small;
font-weight: bold;	font-weight: bold;
}	}
fieldset#LC_mainmenu_fieldset {
margin:0 10px 10px 0;

}

div.LC_createcourse {	div.LC_createcourse {
margin: 10px 10px 10px 10px;	margin: 10px 10px 10px 10px;
}	}

	/* ---- Remove when done ----
	# The following styles is part of the redesign of LON-CAPA and are
	# subject to change during this project.
	# Don't rely on their current functionality as they might be
	# changed or removed.
	# --------------------------*/

	a:hover,
	ol.LC_smallMenu a:hover,
	ol#LC_MenuBreadcrumbs a:hover,
	ol#LC_PathBreadcrumbs a:hover,
	ul#LC_TabMainMenuContent a:hover,
	.LC_FormSectionClearButton input:hover
	ul.LC_TabContent li:hover a {
	color:#BF2317;
	text-decoration:none;
	}

	h1 {
	padding:5px 10px 5px 20px;
	line-height:130%;
	}

	h2,h3,h4,h5,h6 {
	margin: 5px 0 5px 0;
	padding: 0;
	line-height:130%;
	}

	.LC_hcell {
	padding:3px 15px 3px 15px;
	margin: 0;
	background-color:$tabbg;
	color:$fontmenu;
	border-bottom:solid 1px $lg_border_color;
	}

	.LC_noBorder {
	border: 0;
	}


	/* Main Header with discription of Person, Course, etc. */

	.LC_Right {
	float: right;
	margin: 0;
	padding: 0;
	}

	.LC_FormSectionClearButton input {
	background-color:transparent;
	border: none;
	cursor:pointer;
	text-decoration:underline;
	}

	.LC_help_open_topic {
	color: #FFFFFF;
	background-color: #EEEEFF;
	margin: 1px;
	padding: 4px;
	border: 1px solid #000033;
	white-space: nowrap;
	/* vertical-align: middle; */
	}

	dl,ul,div,fieldset {
	margin: 10px 10px 10px 0;
	/* overflow: hidden; */
	}

	#head_userinfo {
	float: left;
	margin: 0;
	}

	#head_userinfo em{
	font-weight: bold;
	font-style: normal;
	}

	ol.LC_smallMenu {
	float: right;
	}

	ol.LC_smallMenu, ol#LC_PathBreadcrumbs {
	margin: 0;
	}

	ol.LC_smallMenu li {
	display: inline;
	padding: 5px 5px 0 10px;
	vertical-align: top;
	}

	ol.LC_smallMenu li img {
	vertical-align: bottom;
	}

	ol.LC_smallMenu a {
	font-size: 90%;
	color: RGB(80, 80, 80);
	text-decoration: none;
	}

	ul#LC_TabMainMenuContent {
	clear: both;
	color: $fontmenu;
	background: $tabbg;
	list-style: none;
	padding: 0;
	margin: 0;
	float:left;
	width: 100%;
	}

	ul#LC_TabMainMenuContent li {
	float: left;
	font-weight: bold;
	line-height: 1.8em;
	padding: 0 0.8em;
	border-right: 1px solid black;
	display: inline;
	vertical-align: middle;
	}

	ul.LC_TabContent ,
	ul.LC_TabContentBigger {
	display:block;
	list-style:none;
	margin: 0;
	padding: 0;
	}

	ul.LC_TabContent li,
	ul.LC_TabContentBigger li {
	display: inline;
	border-right: solid 1px $lg_border_color;
	float:left;
	line-height:140%;
	white-space:nowrap;
	}

	ul#LC_TabMainMenuContent li a {
	color: $fontmenu;
	text-decoration: none;
	}

	ul.LC_TabContent {
	min-height:1.6em;
	}

	ul.LC_TabContent li {
	vertical-align:middle;
	padding: 0 10px 0 10px;
	background-color:$tabbg;
	border-bottom:solid 1px $lg_border_color;
	}

	ul.LC_TabContent li a, ul.LC_TabContent li {
	color:rgb(47,47,47);
	text-decoration:none;
	font-size:95%;
	font-weight:bold;
	padding-right: 16px;
	}

	ul.LC_TabContent li:hover, ul.LC_TabContent li.active {
	background:#FFFFFF url(/adm/lonIcons/open.gif) no-repeat scroll right center;
	border-bottom:solid 1px #FFFFFF;
	padding-right: 16px;
	}

	ul.LC_TabContentBigger li {
	vertical-align:bottom;
	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 li.active {
	background:url(/adm/lonIcons/lightGreyBG.png) repeat-x right bottom;
	}

	ul.LC_TabContentBigger li,
	ul.LC_TabContentBigger li a {
	font-size:110%;
	font-weight:bold;
	}

	ol#LC_MenuBreadcrumbs,
	ol#LC_PathBreadcrumbs,
	ul.LC_CourseBreadcrumbs {
	border-top: solid 1px RGB(255, 255, 255);
	height: 20px;
	line-height: 20px;
	vertical-align: bottom;
	margin: 0 0 30px 0;
	padding-left: 10px;
	list-style-position: inside;
	background: url(/adm/lonIcons/lightGreyBG.png) repeat-x left top;
	}

	ol#LC_MenuBreadcrumbs li,
	ol#LC_PathBreadcrumbs li,
	ul.LC_CourseBreadcrumbs li {
	/*
	background: url(/adm/lonIcons/arrow_white.png) no-repeat left center;
	*/
	display: inline;
	padding: 0 0 0 10px;
	/* vertical-align: bottom; */
	overflow:hidden;
	}

	ol#LC_MenuBreadcrumbs li a, ul.LC_CourseBreadcrumbs li a {
	text-decoration: none;
	font-size:90%;
	}

	ol#LC_PathBreadcrumbs li a {
	text-decoration:none;
	font-size:100%;
	font-weight:bold;
	}

	.LC_BoxPadding {
	padding: 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 {
	float:left;
	margin-right:10px;
	}

	.LC_Clear_AboutMe_Image {
	clear:left;
	}

	dl.LC_ListStyleClean dt {
	padding-right: 5px;
	display: table-header-group;
	}

	dl.LC_ListStyleClean dd {
	display: table-row;
	}

	.LC_ListStyleClean,
	.LC_ListStyleSimple,
	.LC_ListStyleNormal,
	.LC_ListStyle_Border,
	.LC_ListStyleSpecial {
	/display:block; /
	list-style-position: inside;
	list-style-type: none;
	overflow: hidden;
	padding: 0;
	}

	.LC_ListStyleSimple li,
	.LC_ListStyleSimple dd,
	.LC_ListStyleNormal li,
	.LC_ListStyleNormal dd,
	.LC_ListStyleSpecial li,
	.LC_ListStyleSpecial dd {
	margin: 0;
	padding: 5px 5px 5px 10px;
	clear: both;
	}

	.LC_ListStyleClean li,
	.LC_ListStyleClean dd {
	padding-top: 0;
	padding-bottom: 0;
	}

	.LC_ListStyleSimple dd,
	.LC_ListStyleSimple li {
	border-bottom: solid 1px $lg_border_color;
	}

	.LC_ListStyleSpecial li,
	.LC_ListStyleSpecial dd {
	list-style-type: none;
	background-color: RGB(220, 220, 220);
	margin-bottom: 4px;
	}

	table.LC_SimpleTable {
	margin:5px;
	border:solid 1px $lg_border_color;
	}

	table.LC_SimpleTable tr {
	padding: 0;
	border:solid 1px $lg_border_color;
	}

	table.LC_SimpleTable thead {
	background:rgb(220,220,220);
	}

	div.LC_columnSection {
	display: block;
	clear: both;
	overflow: hidden;
	margin: 0;
	}

	div.LC_columnSection>* {
	float: left;
	margin: 10px 20px 10px 0;
	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 {
	text-align:left;
	margin : 0 auto;
	width:90%;
	padding: 10px;
	height: auto;
	background-color:#FFFFFF;
	border:1px solid #CCCCCC;
	}


	.LC_loginpage_loginContainer {
	float:left;
	width: 182px;
	padding: 2px;
	border:1px solid #CCCCCC;
	background-color:$loginbg;
	}

	.LC_loginpage_loginContainer h2 {
	margin-top: 0;
	display:block;
	background:$bgcol;
	color:$textcol;
	padding-left:5px;
	}

	.LC_loginpage_loginInfo {
	float:left;
	width:182px;
	border:1px solid #CCCCCC;
	padding:2px;
	}

	.LC_loginpage_space {
	clear: both;
	margin-bottom: 20px;
	border-bottom: 1px solid #CCCCCC;
	}

	.LC_loginpage_floatLeft {
	float: left;
	width: 200px;
	margin: 0;
	}

	table em {
	font-weight: bold;
	font-style: normal;
	}

	table.LC_tableBrowseRes,
	table.LC_tableOfContent {
	border:none;
	border-spacing: 1;
	padding: 3px;
	background-color: #FFFFFF;
	font-size: 90%;
	}

	table.LC_tableOfContent{
	border-collapse: collapse;
	}

	table.LC_tableBrowseRes a,
	table.LC_tableOfContent a {
	background-color: transparent;
	text-decoration: none;
	}

	table.LC_tableBrowseRes tr.LC_trOdd,
	table.LC_tableOfContent tr.LC_trOdd{
	background-color: #EEEEEE;
	}

	table.LC_tableOfContent img {
	border: none;
	height: 1.3em;
	vertical-align: text-bottom;
	margin-right: 0.3em;
	}

	a#LC_content_toolbar_firsthomework {
	background-image:url(/res/adm/pages/open-first-problem.gif);
	}

	a#LC_content_toolbar_launchnav {
	background-image:url(/res/adm/pages/start-navigation.gif);
	}

	a#LC_content_toolbar_closenav {
	background-image:url(/res/adm/pages/close-navigation.gif);
	}

	a#LC_content_toolbar_everything {
	background-image:url(/res/adm/pages/show-all.gif);
	}

	a#LC_content_toolbar_uncompleted {
	background-image:url(/res/adm/pages/show-incomplete-problems.gif);
	}

	#LC_content_toolbar_clearbubbles {
	background-image:url(/res/adm/pages/mark-discussionentries-read.gif);
	}

	a#LC_content_toolbar_changefolder {
	background : url(/res/adm/pages/close-all-folders.gif) top center ;
	}

	a#LC_content_toolbar_changefolder_toggled {
	background-image:url(/res/adm/pages/open-all-folders.gif);
	}

	ul#LC_toolbar li a:hover {
	background-position: bottom center;
	}

	ul#LC_toolbar {
	padding: 0;
	margin: 2px;
	list-style:none;
	position:relative;
	background-color:white;
	}

	ul#LC_toolbar li {
	border:1px solid white;
	padding: 0;
	margin: 0;
	float: left;
	display:inline;
	vertical-align:middle;
	}


	a.LC_toolbarItem {
	display:block;
	padding: 0;
	margin: 0;
	height: 32px;
	width: 32px;
	color:white;
	border: none;
	background-repeat:no-repeat;
	background-color:transparent;
	}

	ul.LC_functionslist li {
	float: left;
	white-space: nowrap;
	height: 35px; /* at least as high as heighest list item */
	margin: 0 15px 15px 10px;
	}


END	END
}	}

Line 5871 sub xml_begin {	Line 6441 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">'.	$output='<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html>';
'<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">';
}	}
return $output;	return $output;
}	}
Line 6008 sub start_page {	Line 6577 sub start_page {
}	}

if ($args->{'js_ready'}) {	if ($args->{'js_ready'}) {
$result = &js_ready($result);	$result = &js_ready($result);
}	}
if ($args->{'html_encode'}) {	if ($args->{'html_encode'}) {
$result = &html_encode($result);	$result = &html_encode($result);
}	}
#Breadcrumbs
	#Breadcrumbs
if (exists($args->{'bread_crumbs'}) or exists($args->{'bread_crumbs_component'})) {	if (exists($args->{'bread_crumbs'}) or exists($args->{'bread_crumbs_component'})) {
&Apache::lonhtmlcommon::clear_breadcrumbs();	&Apache::lonhtmlcommon::clear_breadcrumbs();
#if any br links exists, add them to the breadcrumbs	#if any br links exists, add them to the breadcrumbs
if (exists($args->{'bread_crumbs'}) and ref($args->{'bread_crumbs'}) eq 'ARRAY') {	if (exists($args->{'bread_crumbs'}) and ref($args->{'bread_crumbs'}) eq 'ARRAY') {
foreach my $crumb (@{$args->{'bread_crumbs'}}){	foreach my $crumb (@{$args->{'bread_crumbs'}}){
&Apache::lonhtmlcommon::add_breadcrumb($crumb);	&Apache::lonhtmlcommon::add_breadcrumb($crumb);
}	}
}	}

#if bread_crumbs_component exists show it as headline else show only the breadcrumbs	#if bread_crumbs_component exists show it as headline else show only the breadcrumbs
if (exists($args->{'bread_crumbs_component'})){	if(exists($args->{'bread_crumbs_component'})){
$result .= &Apache::lonhtmlcommon::breadcrumbs($args->{'bread_crumbs_component'});	$result .= &Apache::lonhtmlcommon::breadcrumbs($args->{'bread_crumbs_component'});
} else {	}else{
$result .= &Apache::lonhtmlcommon::breadcrumbs();	$result .= &Apache::lonhtmlcommon::breadcrumbs();
}	}
}	}
return $result;	return $result;
}	}


=pod	=pod

=item * &head()	=item * &head()
Line 6175 sub simple_error_page {	Line 6746 sub simple_error_page {
}	}

sub start_data_table_empty_row {	sub start_data_table_empty_row {
$row_count[0]++;	# $row_count[0]++;
return '<tr class="LC_empty_row" >'."\n";;	return '<tr class="LC_empty_row" >'."\n";;
}	}

Line 6263 sub get_users_function {	Line 6834 sub get_users_function {
if ($env{'request.role'}=~/^(su\|dc\|ad\|li)/) {	if ($env{'request.role'}=~/^(su\|dc\|ad\|li)/) {
$function='admin';	$function='admin';
}	}
if (($env{'request.role'}=~/^(au\|ca\|aa)/) \|\|	if (($env{'request.role'}=~/^(au\|ca)/) \|\|
($ENV{'REQUEST_URI'}=~/^(\/priv\|\~)/)) {	($ENV{'REQUEST_URI'}=~/^(\/priv\|\~)/)) {
$function='author';	$function='author';
}	}
Line 6274 sub get_users_function {	Line 6845 sub get_users_function {

=pod	=pod

=item * &show_course()

Used by lonmenu.pm and lonroles.pm to determine whether to use the word
'Courses' or 'Roles' in inline navigation and on screen displaying user's roles.
Inputs:
None

Outputs:
Scalar: 1 if 'Course' to be used, 0 otherwise.

=cut

###############################################
sub show_course {
my $course = !$env{'user.adv'};
if (!$env{'user.adv'}) {
foreach my $env (keys(%env)) {
next if ($env !~ m/^user\.priv\./);
if ($env !~ m/^user\.priv\.(?:st\|cm)/) {
$course = 0;
last;
}
}
}
return $course;
}

###############################################

=pod

=item * &check_user_status()	=item * &check_user_status()

Determines current status of supplied role for a	Determines current status of supplied role for a
Line 6808 If the user's status includes multiple t	Line 7348 If the user's status includes multiple t
the largest default quota which applies to the user determines the	the largest default quota which applies to the user determines the
default quota returned.	default quota returned.

	=back

=cut	=cut

###############################################	###############################################
Line 7004 sub user_picker {	Line 7546 sub user_picker {
official => 'institutional',	official => 'institutional',
unofficial => 'non-institutional',	unofficial => 'non-institutional',
);	);
$new_user_create = '<p class="LC_warning">'.	$new_user_create = '<p class="LC_warning">'
&mt("You are not authorized to create new $usertypetext{$usertype} users in this domain.").' '.	.&mt("You are not authorized to create new $usertypetext{$usertype} users in this domain.")
&mt('Please contact the [_1]helpdesk[_2] for assistance.','<a href="'.$helplink.'">','</a>').'</p><br />';	.' '
	.&mt('Please contact the [_1]helpdesk[_2] for assistance.'
	,'<a href="'.$helplink.'">','</a>')
	.'</p><br />';
}	}
}	}
}	}
Line 7043 ENDSCRIPT	Line 7588 ENDSCRIPT

my $output = <<"END_BLOCK";	my $output = <<"END_BLOCK";
<script type="text/javascript">	<script type="text/javascript">
// <![CDATA[
function validateEntry(callingForm) {	function validateEntry(callingForm) {

var checkok = 1;	var checkok = 1;
Line 7112 function validateEntry(callingForm) {	Line 7656 function validateEntry(callingForm) {

$newuserscript	$newuserscript

// ]]>
</script>	</script>

$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 7362 sub get_institutional_codes {	Line 7909 sub get_institutional_codes {

=item * sorted_slots()	=item * sorted_slots()

Sorts an array of slot names in order of slot start time (earliest first).	Sorts an array of slot names in order of slot start time (earliest first).

Inputs:	Inputs:

Line 7404 sub sorted_slots {	Line 7951 sub sorted_slots {
return @sorted;	return @sorted;
}	}

=pod

=back	=pod

=head1 HTTP Helpers	=head1 HTTP Helpers

Line 7697 sub upload_embedded {	Line 8243 sub upload_embedded {
' <a href="'.$url.'">'.	' <a href="'.$url.'">'.
$orig_uploaded_filename.'</a><br />';	$orig_uploaded_filename.'</a><br />';
} else {	} else {
$output .= '<font size="+2">'.	$output .= '<span class=\"LC_fontsize_large\">'.
&mt('View embedded file: [_1]','<a href="'.$url.'">'.	&mt('View embedded file: [_1]','<a href="'.$url.'">'.
$orig_uploaded_filename.'</a>').'</font><br />';	$orig_uploaded_filename.'</a>').'</span><br />';
}	}
}	}
close($fh);	close($fh);
Line 8004 sub csv_print_samples {	Line 8550 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 8049 sub csv_print_select_table {	Line 8594 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 8735 sub build_recipient_list {	Line 9280 sub build_recipient_list {
my @contacts = ('adminemail','supportemail');	my @contacts = ('adminemail','supportemail');
foreach my $item (@contacts) {	foreach my $item (@contacts) {
if ($domconfig{'contacts'}{$mailing}{$item}) {	if ($domconfig{'contacts'}{$mailing}{$item}) {
my $addr = $domconfig{'contacts'}{$item};	my $addr = $domconfig{'contacts'}{$item};
if (!grep(/^\Q$addr\E$/,@recipients)) {	if (!grep(/^\Q$addr\E$/,@recipients)) {
push(@recipients,$addr);	push(@recipients,$addr);
}	}
Line 9015 sub assign_categories_table {	Line 9560 sub assign_categories_table {
my $checked = '';	my $checked = '';
if (@currcategories > 0) {	if (@currcategories > 0) {
if (grep(/^\Q$item\E$/,@currcategories)) {	if (grep(/^\Q$item\E$/,@currcategories)) {
$checked = ' checked="checked" ';	$checked = ' checked="checked"';
}	}
}	}
$output .= '<tr '.$css_class.'><td><span class="LC_nobreak">'.	$output .= '<tr '.$css_class.'><td><span class="LC_nobreak">'.
Line 9081 sub assign_category_rows {	Line 9626 sub assign_category_rows {
if (ref($currcategories) eq 'ARRAY') {	if (ref($currcategories) eq 'ARRAY') {
if (@{$currcategories} > 0) {	if (@{$currcategories} > 0) {
if (grep(/^\Q$item\E$/,@{$currcategories})) {	if (grep(/^\Q$item\E$/,@{$currcategories})) {
$checked = ' checked="checked" ';	$checked = ' checked="checked"';
}	}
}	}
}	}
Line 9653 sub course_type {	Line 10198 sub course_type {
sub group_term {	sub group_term {
my $crstype = &course_type();	my $crstype = &course_type();
my %names = (	my %names = (
'Course' => 'group',	'Course' => 'group',
'Community' => 'group',	'Group' => 'team',
);	);
return $names{$crstype};	return $names{$crstype};
}	}
Line 9718 sub escape_url {	Line 10263 sub escape_url {
return join('/',@urlslices).'/'.$lastitem;	return join('/',@urlslices).'/'.$lastitem;
}	}

sub compare_arrays {
my ($arrayref1,$arrayref2) = @_;
my (@difference,%count);
@difference = ();
%count = ();
if ((ref($arrayref1) eq 'ARRAY') && (ref($arrayref2) eq 'ARRAY')) {
foreach my $element (@{$arrayref1}, @{$arrayref2}) { $count{$element}++; }
foreach my $element (keys(%count)) {
if ($count{$element} == 1) {
push(@difference,$element);
}
}
}
return @difference;
}

# -------------------------------------------------------- Initliaze user login	# -------------------------------------------------------- Initliaze user login
sub init_user_environment {	sub init_user_environment {
my ($r, $username, $domain, $authhost, $form, $args) = @_;	my ($r, $username, $domain, $authhost, $form, $args) = @_;
Line 9865 sub init_user_environment {	Line 10394 sub init_user_environment {
}	}

foreach my $tool ('aboutme','blog','portfolio') {	foreach my $tool ('aboutme','blog','portfolio') {
$userenv{'availabletools.'.$tool} =	$userenv{'availabletools.'.$tool} =
&Apache::lonnet::usertools_access($username,$domain,$tool,'reload');	&Apache::lonnet::usertools_access($username,$domain,$tool,'reload');
}	}

foreach my $crstype ('official','unofficial','community') {	foreach my $crstype ('official','unofficial') {
$userenv{'canrequest.'.$crstype} =	$userenv{'canrequest.'.$crstype} =
&Apache::lonnet::usertools_access($username,$domain,$crstype,	&Apache::lonnet::usertools_access($username,$domain,$crstype,
'reload','requestcourses');	'reload','requestcourses');
Line 9887 sub init_user_environment {	Line 10416 sub init_user_environment {
}	}
untie(%disk_env);	untie(%disk_env);
} else {	} else {
&Apache::lonnet::logthis("<font color=\"blue\">WARNING: ".	&Apache::lonnet::logthis("<span style=\"color:blue;\">WARNING: ".
'Could not create environment storage in lonauth: '.$!.'</font>');	'Could not create environment storage in lonauth: '.$!.'</span>');
return 'error: '.$!;	return 'error: '.$!;
}	}
}	}

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>

Removed from v.1.692.4.9
changed lines
	Added in v.1.808