version 1.711, 2008/12/08 22:43:52
|
version 1.731, 2009/01/08 19:46:43
|
Line 1686 sub select_form {
|
Line 1686 sub select_form {
|
sub display_filter { |
sub display_filter { |
if (!$env{'form.show'}) { $env{'form.show'}=10; } |
if (!$env{'form.show'}) { $env{'form.show'}=10; } |
if (!$env{'form.displayfilter'}) { $env{'form.displayfilter'}='currentfolder'; } |
if (!$env{'form.displayfilter'}) { $env{'form.displayfilter'}='currentfolder'; } |
return '<nobr><label>'.&mt('Records [_1]', |
return '<span class="LC_nobreak"><label>'.&mt('Records [_1]', |
&Apache::lonmeta::selectbox('show',$env{'form.show'},undef, |
&Apache::lonmeta::selectbox('show',$env{'form.show'},undef, |
(&mt('all'),10,20,50,100,1000,10000))). |
(&mt('all'),10,20,50,100,1000,10000))). |
'</label></nobr> <nobr>'. |
'</label></span> <span class="LC_nobreak">'. |
&mt('Filter [_1]', |
&mt('Filter [_1]', |
&select_form($env{'form.displayfilter'}, |
&select_form($env{'form.displayfilter'}, |
'displayfilter', |
'displayfilter', |
('currentfolder' => 'Current folder/page', |
('currentfolder' => 'Current folder/page', |
'containing' => 'Containing phrase', |
'containing' => 'Containing phrase', |
'none' => 'None'))). |
'none' => 'None'))). |
'<input type="text" name="containingphrase" size="30" value="'.&HTML::Entities::encode($env{'form.containingphrase'}).'" /></nobr>'; |
'<input type="text" name="containingphrase" size="30" value="'.&HTML::Entities::encode($env{'form.containingphrase'}).'" /></span>'; |
} |
} |
|
|
sub gradeleveldescription { |
sub gradeleveldescription { |
Line 2717 sub flush_email_cache {
|
Line 2717 sub flush_email_cache {
|
&Apache::lonnet::devalidate_cache_new('emailscache',$id); |
&Apache::lonnet::devalidate_cache_new('emailscache',$id); |
} |
} |
|
|
|
# -------------------------------------------------------------------- getlangs |
|
|
|
=pod |
|
|
|
=item * &getlangs($uname,$udom) |
|
|
|
Gets a user's language preference and returns it as a hash with key: |
|
language. |
|
|
|
=cut |
|
|
|
|
|
sub getlangs { |
|
my ($uname,$udom) = @_; |
|
if (!$udom) { $udom =$env{'user.domain'}; } |
|
if (!$uname) { $uname=$env{'user.name'}; } |
|
my $id=$uname.':'.$udom; |
|
my ($langs,$cached)=&Apache::lonnet::is_cached_new('userlangs',$id); |
|
if ($cached) { |
|
return %{$langs}; |
|
} else { |
|
my %loadlangs=&Apache::lonnet::get('environment',['languages'], |
|
$udom,$uname); |
|
&Apache::lonnet::do_cache_new('userlangs',$id,\%loadlangs); |
|
return %loadlangs; |
|
} |
|
} |
|
|
|
sub flush_langs_cache { |
|
my ($uname,$udom)=@_; |
|
if (!$udom) { $udom =$env{'user.domain'}; } |
|
if (!$uname) { $uname=$env{'user.name'}; } |
|
return if ($udom eq 'public' && $uname eq 'public'); |
|
my $id=$uname.':'.$udom; |
|
&Apache::lonnet::devalidate_cache_new('userlangs',$id); |
|
} |
|
|
# ------------------------------------------------------------------ Screenname |
# ------------------------------------------------------------------ Screenname |
|
|
=pod |
=pod |
Line 3168 sub relative_to_absolute {
|
Line 3205 sub relative_to_absolute {
|
} |
} |
$thisdir=~s-/[^/]*$--; |
$thisdir=~s-/[^/]*$--; |
foreach my $link (@rlinks) { |
foreach my $link (@rlinks) { |
unless (($link=~/^http:\/\//i) || |
unless (($link=~/^https?\:\/\//i) || |
($link=~/^\//) || |
($link=~/^\//) || |
($link=~/^javascript:/i) || |
($link=~/^javascript:/i) || |
($link=~/^mailto:/i) || |
($link=~/^mailto:/i) || |
Line 4392 sub standard_css {
|
Line 4429 sub standard_css {
|
my $link = &designparm($function.'.link', $domain); |
my $link = &designparm($function.'.link', $domain); |
|
|
my $loginbg = &designparm('login.sidebg',$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'; |
Line 4441 table.thinborder tr td {
|
Line 4480 table.thinborder tr td {
|
} |
} |
|
|
form, .inline { display: inline; } |
form, .inline { display: inline; } |
.center { text-align: center; } |
|
.left { text-align:left; } |
.LC_center { text-align: center; } |
.right {text-align:right;} |
.LC_left { text-align:left; } |
.middle {vertical-align:middle;} |
.LC_right {text-align:right;} |
.top {vertical-align:top;} |
.LC_middle {vertical-align:middle;} |
.bottom {vertical-align:bottom;} |
.LC_top {vertical-align:top;} |
|
.LC_bottom {vertical-align:bottom;} |
|
|
|
/* just for tests */ |
|
.LC_300Box { width:300px; } |
|
.LC_200Box {width:200px; } |
|
.LC_500Box {width:500px; } |
|
.LC_600Box {width:600px; } |
|
/* end */ |
|
|
.LC_filename {font-family: $mono; white-space:pre;} |
.LC_filename {font-family: $mono; white-space:pre;} |
.LC_error { |
.LC_error { |
color: red; |
color: red; |
Line 4454 form, .inline { display: inline; }
|
Line 4502 form, .inline { display: inline; }
|
} |
} |
.LC_warning, |
.LC_warning, |
.LC_diff_removed { |
.LC_diff_removed { |
color: red; |
|
} |
} |
|
|
.LC_info, |
.LC_info, |
Line 4665 td.LC_menubuttons_text {
|
Line 4713 td.LC_menubuttons_text {
|
font-size: small; |
font-size: small; |
} |
} |
|
|
|
.LC_mail_functions { |
|
font-weight: bold; |
|
} |
|
|
table.LC_aboutme_port { |
table.LC_aboutme_port { |
border: 0px; |
border: 0px; |
border-collapse: collapse; |
border-collapse: collapse; |
Line 5442 table#LC_mainmenu td.LC_mainmenu_col_fie
|
Line 5494 table#LC_mainmenu td.LC_mainmenu_col_fie
|
font-weight: bold; |
font-weight: bold; |
} |
} |
|
|
|
div.LC_createcourse { |
|
margin: 10px 10px 10px 10px; |
|
} |
|
|
/* ---- Remove when done ---- |
/* ---- Remove when done ---- |
# The following styles is part of the redesign of LON-CAPA and are |
# The following styles is part of the redesign of LON-CAPA and are |
# subject to change during this project. |
# subject to change during this project. |
Line 5450 table#LC_mainmenu td.LC_mainmenu_col_fie
|
Line 5506 table#LC_mainmenu td.LC_mainmenu_col_fie
|
# --------------------------*/ |
# --------------------------*/ |
|
|
a:hover, |
a:hover, |
ol.smallMenu a:hover, |
ol.LC_smallMenu a:hover, |
ol#MenuBreadcrumbs a:hover, |
ol#LC_MenuBreadcrumbs a:hover, |
ul#TabMainMenuContent a:hover, |
ol#LC_PathBreadcrumbs a:hover, |
.FormSectionClearButton input:hover{ |
ul#LC_TabMainMenuContent a:hover, |
|
.LC_FormSectionClearButton input:hover |
|
ul.LC_TabContent li:hover a{ |
color:#BF2317; |
color:#BF2317; |
text-decoration:none; |
text-decoration:none; |
} |
} |
|
|
h1 { |
h1 { |
padding:5px 10px 5px 0px; |
padding:5px 10px 5px 20px; |
line-height:130%; |
line-height:130%; |
} |
} |
|
|
h2,h3,h4,h5,h6 |
h2,h3,h4,h5,h6 |
{ |
{ |
margin:5px 0px 5px 0px; |
margin:5px 0px 5px 0px; |
line-height:130%; |
padding:0px; |
|
line-height:130%; |
} |
} |
.hcell{ |
.LC_hcell{ |
padding:3px 15px 3px 15px; |
padding:3px 15px 3px 15px; |
margin:0px; |
margin:0px; |
background-color:$tabbg; |
background-color:$tabbg; |
border-bottom:solid 1px $lg_border_color; |
border-bottom:solid 1px $lg_border_color; |
} |
} |
.noBorder { |
.LC_noBorder { |
border:0px; |
border:0px; |
} |
} |
/* |
|
.bgLightGrey { background:URL(images/TabMenuBG.png) repeat-x left top; } |
|
.bgLightGreyYellow {background-color:#EFECE0;} |
|
*/ |
|
|
|
|
.LC_bgLightGrey{ |
|
background:URL(/adm/lonIcons/lightGreyBG.png) repeat-x left top; |
|
} |
|
.LC_bgLightGreyYellow { |
|
background-color:#EFECE0; |
|
} |
|
|
/* Main Header with discription of Person, Course, etc. */ |
/* Main Header with discription of Person, Course, etc. */ |
.HeadRight { |
.LC_HeadRight { |
text-align: right; |
text-align: right; |
float: right; |
float: right; |
margin: 0px; |
margin: 0px; |
Line 5494 line-height:130%;
|
Line 5555 line-height:130%;
|
overflow:hidden; |
overflow:hidden; |
} |
} |
|
|
p { |
p, .LC_ContentBox { |
padding: 10px; |
padding: 10px; |
|
|
} |
} |
.FormSectionClearButton input { |
.LC_FormSectionClearButton input { |
background-color:transparent; |
|
border:0px; |
border:0px; |
cursor:pointer; |
cursor:pointer; |
text-decoration:underline; |
text-decoration:underline; |
Line 5510 dl,ul,div,fieldset {
|
Line 5571 dl,ul,div,fieldset {
|
margin: 10px 10px 10px 0px; |
margin: 10px 10px 10px 0px; |
overflow:hidden; |
overflow:hidden; |
} |
} |
ol.smallMenu { |
ol.LC_smallMenu, ol#LC_PathBreadcrumbs { |
margin: 0px; |
margin: 0px; |
} |
} |
|
|
ol.smallMenu li { |
ol.LC_smallMenu li { |
display: inline; |
display: inline; |
padding: 5px 5px 0px 10px; |
padding: 5px 5px 0px 10px; |
vertical-align: top; |
vertical-align: top; |
} |
} |
|
|
ol.smallMenu li img { |
ol.LC_smallMenu li img { |
vertical-align: bottom; |
vertical-align: bottom; |
} |
} |
|
|
ol.smallMenu a { |
ol.LC_smallMenu a { |
font-size: 90%; |
font-size: 90%; |
color: RGB(80, 80, 80); |
color: RGB(80, 80, 80); |
text-decoration: none; |
text-decoration: none; |
} |
} |
|
|
ol#TabMainMenuContent { |
ol#LC_TabMainMenuContent { |
|
display:block; |
|
list-style:none; |
margin: 0px 0px 10px 0px; |
margin: 0px 0px 10px 0px; |
padding: 0px; |
padding: 0px; |
} |
} |
|
|
ol#TabMainMenuContent li { |
ol#LC_TabMainMenuContent li { |
display: inline; |
display: inline; |
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); |
border-right: solid 1px RGB(175, 175, 175); |
padding: 5px 15px 5px 15px; |
padding: 5px 10px 5px 10px; |
margin-right:4px; |
margin-right:3px; |
line-height: 140%; |
line-height: 140%; |
font-weight: bold; |
font-weight: bold; |
overflow:hidden; |
white-space:nowrap; |
/* background: RGB(211, 206, 205) URL(images/TabMenuBG.png) repeat-x left top;*/ |
background: url(/adm/lonIcons/lightGreyBG.png) repeat-x left top; |
} |
} |
|
|
ol#TabMainMenuContent li a{ |
ol#LC_TabMainMenuContent li a{ |
color: RGB(47, 47, 47); |
color: RGB(47, 47, 47); |
text-decoration: none; |
text-decoration: none; |
} |
} |
|
ul.LC_TabContent { |
ol#TabMainMenuContent div.columnSection { |
margin:0px; |
margin-bottom: 0px; |
padding:0px; |
|
display:block; |
|
list-style:none; |
|
min-height:1.5em; |
|
} |
|
ul.LC_TabContent li{ |
|
display:inline; |
|
vertical-align:top; |
|
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{ |
|
color:rgb(47,47,47); |
|
text-decoration:none; |
|
font-size:95%; |
|
font-weight:bold; |
|
white-space:nowrap; |
|
} |
|
.LC_hideThis |
|
{ |
|
display:none; |
|
visibility:hidden; |
} |
} |
|
|
ol#MenuBreadcrumbs, ol#PathBreadcrumbs { |
ol#LC_MenuBreadcrumbs, ol#LC_PathBreadcrumbs { |
border-top: solid 1px RGB(255, 255, 255); |
border-top: solid 1px RGB(255, 255, 255); |
height: 20px; |
height: 20px; |
line-height: 20px; |
line-height: 20px; |
Line 5566 ol#MenuBreadcrumbs, ol#PathBreadcrumbs {
|
Line 5652 ol#MenuBreadcrumbs, ol#PathBreadcrumbs {
|
margin: 0px 0px 30px 0px; |
margin: 0px 0px 30px 0px; |
padding-left: 10px; |
padding-left: 10px; |
list-style-position: inside; |
list-style-position: inside; |
/* background: RGB(211, 206, 205) URL(images/TabMenuBG.png) repeat-x left |
background: url(/adm/lonIcons/lightGreyBG.png) repeat-x left top; |
top;*/ |
|
} |
} |
|
|
ol#MenuBreadcrumbs li, ol#PathBreadcrumbs li { |
ol#LC_MenuBreadcrumbs li, ol#LC_PathBreadcrumbs li { |
/* background: url(images/pfeil_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; |
overflow:hidden; |
overflow:hidden; |
} |
} |
|
|
ol#MenuBreadcrumbs li a { |
ol#LC_MenuBreadcrumbs li a { |
text-decoration: none; |
text-decoration: none; |
font-size:90%; |
font-size:90%; |
} |
} |
ol#PathBreadcrumbs li a{ |
ol#LC_PathBreadcrumbs li a{ |
text-decoration:none; |
text-decoration:none; |
font-size:100%; |
font-size:100%; |
font-weight:bold; |
font-weight:bold; |
} |
} |
|
.LC_ContentBoxSpecial |
.ContentBoxSpecial |
|
{ |
{ |
border: solid 1px $lg_border_color; |
border: solid 1px $lg_border_color; |
} |
} |
.ContentBox { |
.LC_PopUp |
padding:10px; |
|
} |
|
.PopUp |
|
{ |
{ |
padding:10px; |
padding:10px; |
border-left:solid 1px $lg_border_color; |
border-left:solid 1px $lg_border_color; |
Line 5609 ol#PathBreadcrumbs li a{
|
Line 5690 ol#PathBreadcrumbs li a{
|
z-index:5; |
z-index:5; |
} |
} |
|
|
dl.ListStyleClean dt { |
dl.LC_ListStyleClean dt { |
padding-right: 5px; |
padding-right: 5px; |
display: table-header-group; |
display: table-header-group; |
} |
} |
|
|
dl.ListStyleClean dd { |
dl.LC_ListStyleClean dd { |
display: table-row; |
display: table-row; |
} |
} |
|
|
.ListStyleClean, |
.LC_ListStyleClean, |
.ListStyleSimple, |
.LC_ListStyleSimple, |
.ListStyleNormal, |
.LC_ListStyleNormal, |
.ListStyleNormal_Border, |
.LC_ListStyleNormal_Border, |
.ListStyleSpecial |
.LC_ListStyleSpecial |
{ |
{ |
/*display:block; */ |
/*display:block; */ |
list-style-position: inside; |
list-style-position: inside; |
Line 5631 dl.ListStyleClean dd {
|
Line 5712 dl.ListStyleClean dd {
|
padding: 0px; |
padding: 0px; |
} |
} |
|
|
.ListStyleSimple li, |
.LC_ListStyleSimple li, |
.ListStyleSimple dd, |
.LC_ListStyleSimple dd, |
.ListStyleNormal li, |
.LC_ListStyleNormal li, |
.ListStyleNormal dd, |
.LC_ListStyleNormal dd, |
.ListStyleSpecial li, |
.LC_ListStyleSpecial li, |
.ListStyleSpecial dd |
.LC_ListStyleSpecial dd |
{ |
{ |
margin: 0px; |
margin: 0px; |
padding: 5px 5px 5px 10px; |
padding: 5px 5px 5px 10px; |
clear: both; |
clear: both; |
} |
} |
|
|
.ListStyleClean li, |
.LC_ListStyleClean li, |
.ListStyleClean dd { |
.LC_ListStyleClean dd { |
padding-top: 0px; |
padding-top: 0px; |
padding-bottom: 0px; |
padding-bottom: 0px; |
} |
} |
|
|
.ListStyleSimple dd, |
.LC_ListStyleSimple dd, |
.ListStyleSimple li{ |
.LC_ListStyleSimple li{ |
border-bottom: solid 1px $lg_border_color; |
border-bottom: solid 1px $lg_border_color; |
} |
} |
|
|
.ListStyleSpecial li, |
.LC_ListStyleSpecial li, |
.ListStyleSpecial dd { |
.LC_ListStyleSpecial dd { |
list-style-type: none; |
list-style-type: none; |
background-color: RGB(220, 220, 220); |
background-color: RGB(220, 220, 220); |
margin-bottom: 4px; |
margin-bottom: 4px; |
} |
} |
|
|
table.SimpleTable { |
table.LC_SimpleTable { |
margin:5px; |
margin:5px; |
border:solid 1px $lg_border_color; |
border:solid 1px $lg_border_color; |
} |
} |
|
|
table.SimpleTable tr { |
table.LC_SimpleTable tr { |
padding:0px; |
padding:0px; |
border:solid 1px $lg_border_color; |
border:solid 1px $lg_border_color; |
} |
} |
table.SimpleTable thead{ |
table.LC_SimpleTable thead{ |
background:rgb(220,220,220); |
background:rgb(220,220,220); |
} |
} |
|
|
div.columnSection { |
div.LC_columnSection { |
display: block; |
display: block; |
clear: both; |
clear: both; |
overflow: hidden; |
overflow: hidden; |
margin:0px; |
margin:0px; |
} |
} |
|
|
div.columnSection>* { |
div.LC_columnSection>* { |
float: left; |
float: left; |
margin: 10px 20px 10px 0px; |
margin: 10px 20px 10px 0px; |
overflow:hidden; |
overflow:hidden; |
} |
} |
div.columnSection > .ContentBox, |
div.LC_columnSection > .LC_ContentBox, |
div.columnSection > .ContentBoxSpecial |
div.LC_columnSection > .LC_ContentBoxSpecial |
{ |
{ |
width: 400px; |
width: 400px; |
|
} |
|
|
|
.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: 0px; |
|
font-size: 0px; |
|
height: 0px; |
} |
} |
|
|
.LC_loginpage_container { |
.LC_loginpage_container { |
Line 5699 div.columnSection > .ContentBoxSpecial
|
Line 5801 div.columnSection > .ContentBoxSpecial
|
width:65%; |
width:65%; |
padding: 10px; |
padding: 10px; |
height: auto; |
height: auto; |
# background-color:#FFFFFF; |
background-color:#FFFFFF; |
background-color:$loginbg; |
|
border:1px solid #CCCCCC; |
border:1px solid #CCCCCC; |
} |
} |
|
|
|
|
.LC_loginpage_loginContainer { |
.LC_loginpage_loginContainer { |
float:left; |
float:left; |
width:60%; |
width: 182px; |
|
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 { |
.LC_loginpage_loginInfo { |
margin-top:20px; |
|
margin-left:20px; |
margin-left:20px; |
float:left; |
float:left; |
width:30%; |
width:30%; |
Line 5719 div.columnSection > .ContentBoxSpecial
|
Line 5828 div.columnSection > .ContentBoxSpecial
|
padding:10px; |
padding:10px; |
} |
} |
|
|
|
.LC_loginpage_loginDomain { |
|
margin-right:20px; |
|
width:20%; |
|
float:left; |
|
padding:10px; |
|
} |
|
|
.LC_loginpage_space { |
.LC_loginpage_space { |
clear:both; |
clear:both; |
margin-bottom:20px; |
margin-bottom:20px; |
Line 5738 div.columnSection > .ContentBoxSpecial
|
Line 5854 div.columnSection > .ContentBoxSpecial
|
} |
} |
|
|
|
|
|
|
END |
END |
} |
} |
|
|
Line 6002 sub start_page {
|
Line 6117 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); |
|
} |
|
|
|
if (exists($args->{'bread_crumbs'})) { |
|
&Apache::lonhtmlcommon::clear_breadcrumbs(); |
|
if (ref($args->{'bread_crumbs'}) eq 'ARRAY') { |
|
foreach my $crumb (@{$args->{'bread_crumbs'}}){ |
|
&Apache::lonhtmlcommon::add_breadcrumb($crumb); |
|
} |
|
} |
|
$result .= &Apache::lonhtmlcommon::breadcrumbs(); |
} |
} |
|
|
return $result; |
return $result; |
} |
} |
|
|
Line 7854 sub upfile_select_html {
|
Line 7980 sub upfile_select_html {
|
# xml => &mt('HTML/XML'), |
# xml => &mt('HTML/XML'), |
); |
); |
my $Str = '<input type="file" name="upfile" size="50" />'. |
my $Str = '<input type="file" name="upfile" size="50" />'. |
'<br />Type: <select name="upfiletype">'; |
'<br />'.&mt('Type').': <select name="upfiletype">'; |
foreach my $type (sort(keys(%Types))) { |
foreach my $type (sort(keys(%Types))) { |
$Str .= '<option value="'.$type.'" >'.$Types{$type}."</option>\n"; |
$Str .= '<option value="'.$type.'" >'.$Types{$type}."</option>\n"; |
} |
} |
Line 7942 sub csv_print_select_table {
|
Line 8068 sub csv_print_select_table {
|
&end_data_table_header_row()."\n"); |
&end_data_table_header_row()."\n"); |
foreach my $array_ref (@$d) { |
foreach my $array_ref (@$d) { |
my ($value,$display,$defaultcol)=@{ $array_ref }; |
my ($value,$display,$defaultcol)=@{ $array_ref }; |
$r->print(&start_data_table_row().'<tr><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.');">'); |
Line 9278 sub construct_course {
|
Line 9404 sub construct_course {
|
'policy.email', |
'policy.email', |
'comment.email', |
'comment.email', |
'pch.users.denied', |
'pch.users.denied', |
'plc.users.denied'], |
'plc.users.denied', |
|
'hidefromcat', |
|
'categories'], |
$$crsudom,$$crsunum); |
$$crsudom,$$crsunum); |
} |
} |
|
|
Line 9736 sub init_user_environment {
|
Line 9864 sub init_user_environment {
|
} |
} |
} |
} |
|
|
|
foreach my $tool ('aboutme','blog','portfolio') { |
|
$userenv{'availabletools.'.$tool} = |
|
&Apache::lonnet::usertools_access($username,$domain,$tool,'reload'); |
|
} |
|
|
$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", |
Line 9774 sub _add_to_env {
|
Line 9907 sub _add_to_env {
|
# --- Get the symbolic name of a problem and the url |
# --- Get the symbolic name of a problem and the url |
sub get_symb { |
sub get_symb { |
my ($request,$silent) = @_; |
my ($request,$silent) = @_; |
(my $url=$env{'form.url'}) =~ s-^http://($ENV{'SERVER_NAME'}|$ENV{'HTTP_HOST'})--; |
(my $url=$env{'form.url'}) =~ s-^https?\://($ENV{'SERVER_NAME'}|$ENV{'HTTP_HOST'})--; |
my $symb=($env{'form.symb'} ne '' ? $env{'form.symb'} : (&Apache::lonnet::symbread($url))); |
my $symb=($env{'form.symb'} ne '' ? $env{'form.symb'} : (&Apache::lonnet::symbread($url))); |
if ($symb eq '') { |
if ($symb eq '') { |
if (!$silent) { |
if (!$silent) { |
Line 9801 sub get_annotation {
|
Line 9934 sub get_annotation {
|
} |
} |
|
|
sub clean_symb { |
sub clean_symb { |
my ($symb) = @_; |
my ($symb,$delete_enc) = @_; |
|
|
&Apache::lonenc::check_decrypt(\$symb); |
&Apache::lonenc::check_decrypt(\$symb); |
my $enc = $env{'request.enc'}; |
my $enc = $env{'request.enc'}; |
delete($env{'request.enc'}); |
if ($delete_enc) { |
|
delete($env{'request.enc'}); |
|
} |
|
|
return ($symb,$enc); |
return ($symb,$enc); |
} |
} |