version 1.738, 2009/01/30 11:39:38
|
version 1.768, 2009/03/17 16:11:52
|
Line 923 sub help_open_topic {
|
Line 923 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'><a target=\"_top\" href=\"$link\"><span style=\"color:#FFFFFF;font-size:10pt;\">$text</span></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 .= <<"ENDTEMPLATE"; |
$template.=' <a target="_top" href="'.$link.'" title="'.$title.'">' |
<a target="_top" href="$link" title="$title"><img src="$helpicon" border="0" alt="(Help: $topic)" /></a> |
.'<img src="'.$helpicon.'" border="0"' |
ENDTEMPLATE |
.' alt="'.&mt('Help: [_1]',$topic).'"' |
if ($text ne '') { $template.='</td></tr></table>' }; |
.' title="'.$title.'"' |
|
.' /></a>'; |
|
if ($text ne "") { |
|
$template.='</span>'; |
|
} |
return $template; |
return $template; |
|
|
} |
} |
Line 947 sub helpLatexCheatsheet {
|
Line 951 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 1746 sub select_level_form {
|
Line 1751 sub select_level_form {
|
|
|
=pod |
=pod |
|
|
=item * &select_dom_form($defdom,$name,$includeempty,$showdomdesc) |
=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 1755 See loncreateuser.pm for an example invo
|
Line 1760 See loncreateuser.pm for an example invo
|
If the $includeempty flag is set, it also includes an empty choice ("no domain |
If the $includeempty flag is set, it also includes an empty choice ("no domain |
selected"); |
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. |
|
|
=cut |
=cut |
|
|
#------------------------------------------- |
#------------------------------------------- |
sub select_dom_form { |
sub select_dom_form { |
my ($defdom,$name,$includeempty,$showdomdesc) = @_; |
my ($defdom,$name,$includeempty,$showdomdesc,$autosubmit) = @_; |
|
my $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); } |
my $selectdomain = "<select name=\"$name\" size=\"1\">\n"; |
my $selectdomain = "<select name=\"$name\" size=\"1\"$onchange>\n"; |
foreach my $dom (@domains) { |
foreach my $dom (@domains) { |
$selectdomain.="<option value=\"$dom\" ". |
$selectdomain.="<option value=\"$dom\" ". |
($dom eq $defdom ? 'selected="selected" ' : '').'>'.$dom; |
($dom eq $defdom ? 'selected="selected" ' : '').'>'.$dom; |
Line 2804 sub aboutmewrapper {
|
Line 2815 sub aboutmewrapper {
|
return; |
return; |
} |
} |
return '<a href="/adm/'.$domain.'/'.$username.'/aboutme"'. |
return '<a href="/adm/'.$domain.'/'.$username.'/aboutme"'. |
($target?' target="$target"':'').' title="'.&mt("View this user's personal page").'">'.$link.'</a>'; |
($target?' target="$target"':'').' title="'.&mt("View this user's personal information page").'">'.$link.'</a>'; |
} |
} |
|
|
# ------------------------------------------------------------ Syllabus Wrapper |
# ------------------------------------------------------------ Syllabus Wrapper |
Line 3073 sub languages {
|
Line 3084 sub languages {
|
return $preferred_possibilities[0]; |
return $preferred_possibilities[0]; |
} |
} |
|
|
|
sub user_lang { |
|
my ($touname,$toudom,$fromcid) = @_; |
|
my @userlangs; |
|
if (($fromcid ne '') && ($env{'course.'.$fromcid.'.languages'} ne '')) { |
|
@userlangs=(@userlangs,split(/\s*(\,|\;|\:)\s*/, |
|
$env{'course.'.$fromcid.'.languages'})); |
|
} else { |
|
my %langhash = &getlangs($touname,$toudom); |
|
if ($langhash{'languages'} ne '') { |
|
@userlangs = split(/\s*(\,|\;|\:)\s*/,$langhash{'languages'}); |
|
} else { |
|
my %domdefs = &Apache::lonnet::get_domain_defaults($toudom); |
|
if ($domdefs{'lang_def'} ne '') { |
|
@userlangs = ($domdefs{'lang_def'}); |
|
} |
|
} |
|
} |
|
my @languages=&Apache::lonlocal::get_genlanguages(@userlangs); |
|
my $user_lh = Apache::localize->get_handle(@languages); |
|
return $user_lh; |
|
} |
|
|
|
|
############################################################### |
############################################################### |
## Student Answer Attempts ## |
## Student Answer Attempts ## |
############################################################### |
############################################################### |
Line 3788 sub blocking_status {
|
Line 3822 sub blocking_status {
|
&Apache::lonnet::coursedescription($course); |
&Apache::lonnet::coursedescription($course); |
$coursedesc = $courseinfo{'description'}; |
$coursedesc = $courseinfo{'description'}; |
} |
} |
$category = "Group 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 4217 $realm
|
Line 4251 $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 4496 form, .inline { display: inline; }
|
Line 4530 form, .inline { display: inline; }
|
|
|
/* just for tests */ |
/* just for tests */ |
.LC_300Box { width:300px; } |
.LC_300Box { width:300px; } |
.LC_200Box {width:200px; } |
.LC_400Box {width:400px; } |
.LC_500Box {width:500px; } |
.LC_500Box {width:500px; } |
.LC_600Box {width:600px; } |
.LC_600Box {width:600px; } |
|
.LC_800Box {width:800px;} |
/* end */ |
/* end */ |
|
|
.LC_filename {font-family: $mono; white-space:pre;} |
.LC_filename {font-family: $mono; white-space:pre;} |
Line 4583 table#LC_title_bar td.LC_title_bar_who {
|
Line 4618 table#LC_title_bar td.LC_title_bar_who {
|
span.LC_metadata { |
span.LC_metadata { |
font-family: $sans; |
font-family: $sans; |
} |
} |
span.LC_title_bar_title { |
|
font: bold x-large $sans; |
|
} |
|
table#LC_title_bar td.LC_title_bar_domain_logo { |
table#LC_title_bar td.LC_title_bar_domain_logo { |
background: $sidebg; |
background: $sidebg; |
text-align: right; |
text-align: right; |
Line 5026 table.LC_pick_box td.LC_pick_box_title {
|
Line 5058 table.LC_pick_box td.LC_pick_box_title {
|
background: $tabbg; |
background: $tabbg; |
font-weight: bold; |
font-weight: bold; |
text-align: right; |
text-align: right; |
|
vertical-align: top; |
width: 184px; |
width: 184px; |
padding: 8px; |
padding: 8px; |
} |
} |
Line 5537 h2,h3,h4,h5,h6
|
Line 5570 h2,h3,h4,h5,h6
|
} |
} |
|
|
.LC_bgLightGrey{ |
.LC_bgLightGrey{ |
background:URL(/adm/lonIcons/lightGreyBG.png) repeat-x left top; |
background:URL(/adm/lonIcons/lightGreyBG.png) repeat-x left bottom; |
} |
|
.LC_bgLightGreyYellow { |
|
background-color:#EFECE0; |
|
} |
} |
|
|
|
|
/* Main Header with discription of Person, Course, etc. */ |
/* Main Header with discription of Person, Course, etc. */ |
.LC_HeadRight { |
.LC_HeadRight { |
text-align: right; |
text-align: right; |
Line 5554 h2,h3,h4,h5,h6
|
Line 5585 h2,h3,h4,h5,h6
|
overflow:hidden; |
overflow:hidden; |
} |
} |
|
|
|
.LC_Right { |
|
float: right; |
|
margin: 0px; |
|
padding: 0px; |
|
} |
|
|
p, .LC_ContentBox { |
p, .LC_ContentBox { |
padding: 10px; |
padding: 10px; |
|
|
} |
} |
.LC_FormSectionClearButton input { |
.LC_FormSectionClearButton input { |
|
background-color:transparent; |
border:0px; |
border:0px; |
cursor:pointer; |
cursor:pointer; |
text-decoration:underline; |
text-decoration:underline; |
} |
} |
|
|
|
.LC_help_open_topic { |
|
color: #FFFFFF; |
|
background-color: #EEEEFF; |
|
margin: 1px; |
|
padding: 4px; |
|
border: 1px solid #000033; |
|
white-space: nowrap; |
|
} |
|
|
dl,ul,div,fieldset { |
dl,ul,div,fieldset { |
margin: 10px 10px 10px 0px; |
margin: 10px 10px 10px 0px; |
Line 5589 ol.LC_smallMenu a {
|
Line 5634 ol.LC_smallMenu a {
|
color: RGB(80, 80, 80); |
color: RGB(80, 80, 80); |
text-decoration: none; |
text-decoration: none; |
} |
} |
|
ol#LC_TabMainMenuContent, ul.LC_TabContent , |
ol#LC_TabMainMenuContent { |
ul.LC_TabContentBigger { |
display:block; |
display:block; |
list-style:none; |
list-style:none; |
margin: 0px 0px 10px 0px; |
margin: 0px; |
padding: 0px; |
padding: 0px; |
} |
} |
|
|
ol#LC_TabMainMenuContent li { |
ol#LC_TabMainMenuContent li, ul.LC_TabContent li, |
|
ul.LC_TabContentBigger li{ |
display: inline; |
display: inline; |
|
border-right: solid 1px $lg_border_color; |
|
float:left; |
|
line-height:140%; |
|
white-space:nowrap; |
|
} |
|
ol#LC_TabMainMenuContent li{ |
vertical-align: bottom; |
vertical-align: bottom; |
border-bottom: solid 1px RGB(175, 175, 175); |
border-bottom: solid 1px RGB(175, 175, 175); |
border-right: solid 1px RGB(175, 175, 175); |
|
padding: 5px 10px 5px 10px; |
padding: 5px 10px 5px 10px; |
margin-right:3px; |
margin-right:5px; |
line-height: 140%; |
margin-bottom:3px; |
font-weight: bold; |
font-weight: bold; |
white-space:nowrap; |
|
background: url(/adm/lonIcons/lightGreyBG.png) repeat-x left top; |
background: url(/adm/lonIcons/lightGreyBG.png) repeat-x left top; |
} |
} |
|
|
Line 5615 ol#LC_TabMainMenuContent li a{
|
Line 5665 ol#LC_TabMainMenuContent li a{
|
text-decoration: none; |
text-decoration: none; |
} |
} |
ul.LC_TabContent { |
ul.LC_TabContent { |
margin:0px; |
min-height:1.6em; |
padding:0px; |
|
display:block; |
|
list-style:none; |
|
min-height:1.5em; |
|
} |
} |
ul.LC_TabContent li{ |
ul.LC_TabContent li{ |
display:inline; |
vertical-align:middle; |
vertical-align:top; |
padding:0px 10px 0px 10px; |
|
background-color:$tabbg; |
border-bottom:solid 1px $lg_border_color; |
border-bottom:solid 1px $lg_border_color; |
border-right:solid 1px $lg_border_color; |
|
padding:5px 10px 5px 10px; |
|
margin-right:2px; |
|
background: url(/adm/lonIcons/lightGreyBG.png) repeat-x left top; |
|
} |
} |
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; |
font-size:95%; |
font-size:95%; |
font-weight:bold; |
font-weight:bold; |
white-space:nowrap; |
padding-right: 16px; |
} |
} |
|
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: url(/adm/lonIcons/lightGreyBG.png) repeat-x right bottom; |
border-bottom:solid 1px #FFFFFF; |
color:#BF2317; |
padding-right: 16px; |
text-decoration:none; |
} |
|
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; |
|
} |
|
#LC_CourseDocuments, #LC_SupplementalCourseDocuments |
|
{ |
|
margin:0px; |
} |
} |
|
|
.LC_hideThis |
.LC_hideThis |
Line 5662 ol#LC_MenuBreadcrumbs, ol#LC_PathBreadcr
|
Line 5723 ol#LC_MenuBreadcrumbs, ol#LC_PathBreadcr
|
} |
} |
|
|
ol#LC_MenuBreadcrumbs li, ol#LC_PathBreadcrumbs li { |
ol#LC_MenuBreadcrumbs li, ol#LC_PathBreadcrumbs li { |
|
/* |
background: url(/adm/lonIcons/arrow_white.png) no-repeat left center; |
background: url(/adm/lonIcons/arrow_white.png) no-repeat left center; |
|
*/ |
display: inline; |
display: inline; |
padding: 0px 0px 0px 10px; |
padding: 0px 0px 0px 10px; |
vertical-align: bottom; |
vertical-align: bottom; |
Line 5682 ol#LC_PathBreadcrumbs li a{
|
Line 5745 ol#LC_PathBreadcrumbs li a{
|
{ |
{ |
border: solid 1px $lg_border_color; |
border: solid 1px $lg_border_color; |
} |
} |
.LC_PopUp |
.LC_ContentBoxSpecialContactInfo |
{ |
{ |
padding:10px; |
border: solid 1px $lg_border_color; |
border-left:solid 1px $lg_border_color; |
max-width:25%; |
border-top:solid 1px $lg_border_color; |
min-width:25%; |
border-bottom:outset 1px $lg_border_color; |
} |
border-right:outset 1px $lg_border_color; |
.LC_AboutMe_Image |
display:none; |
{ |
position:absolute; |
float:left; |
right:0; |
margin-right:10px; |
background-color:white; |
} |
z-index:5; |
.LC_Clear_AboutMe_Image |
|
{ |
|
clear:left; |
} |
} |
|
|
dl.LC_ListStyleClean dt { |
dl.LC_ListStyleClean dt { |
padding-right: 5px; |
padding-right: 5px; |
display: table-header-group; |
display: table-header-group; |
Line 5771 div.LC_columnSection {
|
Line 5835 div.LC_columnSection {
|
div.LC_columnSection>* { |
div.LC_columnSection>* { |
float: left; |
float: left; |
margin: 10px 20px 10px 0px; |
margin: 10px 20px 10px 0px; |
overflow:hidden; |
overflow:hidden; |
} |
|
div.LC_columnSection > .LC_ContentBox, |
|
div.LC_columnSection > .LC_ContentBoxSpecial |
|
{ |
|
width: 400px; |
|
} |
} |
|
|
.ContentBoxSpecialTemplate |
.ContentBoxSpecialTemplate |
Line 5791 div.LC_columnSection > .ContentBoxTempla
|
Line 5850 div.LC_columnSection > .ContentBoxTempla
|
div.LC_columnSection > .ContentBoxSpecialTemplate |
div.LC_columnSection > .ContentBoxSpecialTemplate |
{ |
{ |
width: 600px; |
width: 600px; |
|
|
} |
} |
|
|
.clear{ |
.clear{ |
Line 5842 div.LC_columnSection > .ContentBoxSpecia
|
Line 5900 div.LC_columnSection > .ContentBoxSpecia
|
} |
} |
|
|
.LC_loginpage_space { |
.LC_loginpage_space { |
clear:both; |
clear: both; |
margin-bottom:20px; |
margin-bottom: 20px; |
border-bottom: 1px solid #CCCCCC; |
border-bottom: 1px solid #CCCCCC; |
} |
} |
|
|
.LC_loginpage_fieldset{ |
table em{ |
border: 1px solid #CCCCCC; |
font-weight: bold; |
margin: 0 auto; |
font-style: normal; |
} |
} |
|
|
.LC_loginpage_legend{ |
table.LC_tableOfContent{ |
padding: 2px; |
border-collapse: collapse; |
margin: 0px; |
border-spacing: 0; |
font-size:14px; |
padding: 3px; |
font-weight:bold; |
border: 0; |
|
background-color: #FFFFFF; |
|
font-size: 90%; |
|
} |
|
table.LC_tableOfContent a { |
|
background-color:transparent; |
|
text-decoration: none; |
|
} |
|
|
|
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:0 none; |
|
background-repeat:no-repeat; |
|
background-color:transparent; |
} |
} |
|
|
|
|
Line 6129 sub start_page {
|
Line 6269 sub start_page {
|
$result = &html_encode($result); |
$result = &html_encode($result); |
} |
} |
|
|
if (exists($args->{'bread_crumbs'})) { |
#Breadcrumbs |
&Apache::lonhtmlcommon::clear_breadcrumbs(); |
if (exists($args->{'bread_crumbs'}) or exists($args->{'bread_crumbs_component'})) { |
if (ref($args->{'bread_crumbs'}) eq 'ARRAY') { |
&Apache::lonhtmlcommon::clear_breadcrumbs(); |
foreach my $crumb (@{$args->{'bread_crumbs'}}){ |
#if any br links exists, add them to the breadcrumbs |
&Apache::lonhtmlcommon::add_breadcrumb($crumb); |
if (exists($args->{'bread_crumbs'}) and ref($args->{'bread_crumbs'}) eq 'ARRAY') { |
} |
foreach my $crumb (@{$args->{'bread_crumbs'}}){ |
} |
&Apache::lonhtmlcommon::add_breadcrumb($crumb); |
$result .= &Apache::lonhtmlcommon::breadcrumbs(); |
} |
} |
} |
|
|
|
#if bread_crumbs_component exists show it as headline else show only the breadcrumbs |
|
if(exists($args->{'bread_crumbs_component'})){ |
|
$result .= &Apache::lonhtmlcommon::breadcrumbs($args->{'bread_crumbs_component'}); |
|
}else{ |
|
$result .= &Apache::lonhtmlcommon::breadcrumbs(); |
|
} |
|
} |
return $result; |
return $result; |
} |
} |
|
|
Line 6899 sub default_quota {
|
Line 7046 sub default_quota {
|
['quotas'],$udom); |
['quotas'],$udom); |
if (ref($quotahash{'quotas'}) eq 'HASH') { |
if (ref($quotahash{'quotas'}) eq 'HASH') { |
if ($inststatus ne '') { |
if ($inststatus ne '') { |
my @statuses = split(/:/,$inststatus); |
my @statuses = map { &unescape($_); } split(/:/,$inststatus); |
foreach my $item (@statuses) { |
foreach my $item (@statuses) { |
if (ref($quotahash{'quotas'}{'defaultquota'}) eq 'HASH') { |
if (ref($quotahash{'quotas'}{'defaultquota'}) eq 'HASH') { |
if ($quotahash{'quotas'}{'defaultquota'}{$item} ne '') { |
if ($quotahash{'quotas'}{'defaultquota'}{$item} ne '') { |
Line 7365 sub personal_data_fieldtitles {
|
Line 7512 sub personal_data_fieldtitles {
|
middlename => 'Middle Name', |
middlename => 'Middle Name', |
generation => 'Generation', |
generation => 'Generation', |
gen => 'Generation', |
gen => 'Generation', |
|
inststatus => 'Affiliation', |
); |
); |
return %fieldtitles; |
return %fieldtitles; |
} |
} |
Line 8730 sub restore_settings {
|
Line 8878 sub restore_settings {
|
|
|
=item * &build_recipient_list() |
=item * &build_recipient_list() |
|
|
Build recipient lists for three types of e-mail: |
Build recipient lists for four types of e-mail: |
(a) Error Reports, (b) Package Updates, (c) Help requests, generated by |
(a) Error Reports, (b) Package Updates, (c) lonstatus warnings/errors |
lonerrorhandler.pm, CHECKRPMS and lonsupportreq.pm respectively. |
(d) Help requests, generated by |
|
lonerrorhandler.pm, CHECKRPMS, loncron, and lonsupportreq.pm respectively. |
|
|
Inputs: |
Inputs: |
defmail (scalar - email address of default recipient), |
defmail (scalar - email address of default recipient), |
Line 8756 sub build_recipient_list {
|
Line 8905 sub build_recipient_list {
|
my %domconfig = |
my %domconfig = |
&Apache::lonnet::get_dom('configuration',['contacts'],$defdom); |
&Apache::lonnet::get_dom('configuration',['contacts'],$defdom); |
if (ref($domconfig{'contacts'}) eq 'HASH') { |
if (ref($domconfig{'contacts'}) eq 'HASH') { |
if (ref($domconfig{'contacts'}{$mailing}) eq 'HASH') { |
if (exists($domconfig{'contacts'}{$mailing})) { |
my @contacts = ('adminemail','supportemail'); |
if (ref($domconfig{'contacts'}{$mailing}) eq 'HASH') { |
foreach my $item (@contacts) { |
my @contacts = ('adminemail','supportemail'); |
if ($domconfig{'contacts'}{$mailing}{$item}) { |
foreach my $item (@contacts) { |
my $addr = $domconfig{'contacts'}{$item}; |
if ($domconfig{'contacts'}{$mailing}{$item}) { |
if (!grep(/^\Q$addr\E$/,@recipients)) { |
my $addr = $domconfig{'contacts'}{$item}; |
push(@recipients,$addr); |
if (!grep(/^\Q$addr\E$/,@recipients)) { |
|
push(@recipients,$addr); |
|
} |
} |
} |
|
$otheremails = $domconfig{'contacts'}{$mailing}{'others'}; |
} |
} |
$otheremails = $domconfig{'contacts'}{$mailing}{'others'}; |
|
} |
} |
|
} elsif ($origmail ne '') { |
|
push(@recipients,$origmail); |
} |
} |
} elsif ($origmail ne '') { |
} elsif ($origmail ne '') { |
push(@recipients,$origmail); |
push(@recipients,$origmail); |
Line 9875 sub init_user_environment {
|
Line 10028 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') { |
|
$userenv{'canrequest.'.$crstype} = |
|
&Apache::lonnet::usertools_access($username,$domain,$crstype, |
|
'reload','requestcourses'); |
|
} |
|
|
$env{'user.environment'} = "$lonids/$cookie.id"; |
$env{'user.environment'} = "$lonids/$cookie.id"; |
|
|
if (tie(my %disk_env,'GDBM_File',"$lonids/$cookie.id", |
if (tie(my %disk_env,'GDBM_File',"$lonids/$cookie.id", |