version 1.407, 2013/01/03 20:16:22
|
version 1.412, 2013/05/05 00:15:02
|
Line 514 sub innerregister {
|
Line 514 sub innerregister {
|
&Apache::lonhtmlcommon::docs_breadcrumbs(undef,$crstype,undef,$title,1); |
&Apache::lonhtmlcommon::docs_breadcrumbs(undef,$crstype,undef,$title,1); |
} |
} |
return $trail; |
return $trail; |
|
} elsif ($resurl =~ m{^\Q/uploaded$courseurl/portfolio/syllabus/}) { |
|
&Apache::lonhtmlcommon::clear_breadcrumbs(); |
|
&prepare_functions('/public'.$courseurl."/syllabus", |
|
$forcereg,$group,undef,undef,1); |
|
$title = &mt('Syllabus File'); |
|
my ($trail) = |
|
&Apache::lonhtmlcommon::docs_breadcrumbs(undef,$crstype,undef,$title,1); |
|
return $trail; |
} |
} |
unless ($env{'request.state'} eq 'construct') { |
unless ($env{'request.state'} eq 'construct') { |
&Apache::lonhtmlcommon::clear_breadcrumbs(); |
&Apache::lonhtmlcommon::clear_breadcrumbs(); |
Line 846 sub prepare_functions {
|
Line 854 sub prepare_functions {
|
# |
# |
# This applies in course context |
# This applies in course context |
# |
# |
if (($resurl eq "/public/$cdom/$cnum/syllabus") && ($perms{'mdc'})) { |
if (($perms{'mdc'}) && |
if ($env{'course.'.$env{'request.course.id'}.'.externalsyllabus'} =~ /\w/) { |
(($resurl eq "/public/$cdom/$cnum/syllabus") || |
&switch('','',6,1,'pcstr.png','Edit', |
($resurl =~ m{^/uploaded/$cdom/$cnum/portfolio/syllabus/}))) { |
'resource[_2]', |
$cfile = $resurl; |
"go('/adm/courseprefs?phase=display&actions=courseinfo')", |
$home = &Apache::lonnet::homeserver($cnum,$cdom); |
'Edit this resource'); |
if ($env{'form.forceedit'}) { |
$editbutton = 1; |
$forceview = 1; |
} else { |
} else { |
$cfile = $resurl; |
$forceedit = 1; |
$home = &Apache::lonnet::homeserver($cnum,$cdom); |
|
if ($env{'form.forceedit'}) { |
|
$forceview = 1; |
|
} else { |
|
$forceedit = 1; |
|
} |
|
$editbutton = &get_editbutton($cfile,$home,$switchserver, |
|
$forceedit,$forceview,$forcereg); |
|
} |
} |
|
$editbutton = &get_editbutton($cfile,$home,$switchserver, |
|
$forceedit,$forceview,$forcereg); |
} elsif (($resurl eq '/adm/extresedit') && |
} elsif (($resurl eq '/adm/extresedit') && |
(($env{'form.symb'}) || ($env{'form.folderpath'}))) { |
(($env{'form.symb'}) || ($env{'form.folderpath'}))) { |
($cfile,$home,$switchserver,$forceedit,$forceview) = |
($cfile,$home,$switchserver,$forceedit,$forceview) = |
Line 991 sub advtools_crumbs {
|
Line 993 sub advtools_crumbs {
|
&Apache::lonhtmlcommon::add_breadcrumb_tool( |
&Apache::lonhtmlcommon::add_breadcrumb_tool( |
'advtools', $funcs[61]); |
'advtools', $funcs[61]); |
} |
} |
|
return; |
} |
} |
|
|
# ================================================================== Raw Config |
# ================================================================== Raw Config |
Line 1672 sub roles_selector {
|
Line 1675 sub roles_selector {
|
} |
} |
} |
} |
} |
} |
if ($crstype eq 'Community') { |
$switchtext = &mt('Switch role'); |
$switchtext = &mt('Switch community role') |
|
} else { |
|
$switchtext = &mt('Switch course role') |
|
} |
|
my @roles_order = ($ccrole,'in','ta','ep','ad','st'); |
my @roles_order = ($ccrole,'in','ta','ep','ad','st'); |
my $numdiffsec; |
my $numdiffsec; |
if (keys(%seccount) == 1) { |
if (keys(%seccount) == 1) { |
Line 1798 sub get_all_courseroles {
|
Line 1797 sub get_all_courseroles {
|
push(@{$courseroles->{'st'}},keys(%sections_count)); |
push(@{$courseroles->{'st'}},keys(%sections_count)); |
$seccount->{'st'} = scalar(keys(%sections_count)); |
$seccount->{'st'} = scalar(keys(%sections_count)); |
} |
} |
|
$seccount->{'st'} ++; # Increment for a section-less student role. |
my $rolehash = { |
my $rolehash = { |
'roles' => $courseroles, |
'roles' => $courseroles, |
'seccount' => $seccount, |
'seccount' => $seccount, |
Line 2002 sub countdown_timer {
|
Line 2002 sub countdown_timer {
|
} |
} |
my $duedate = &Apache::lonnet::EXT("resource.0.duedate"); |
my $duedate = &Apache::lonnet::EXT("resource.0.duedate"); |
my @interval=&Apache::lonnet::EXT("resource.0.interval"); |
my @interval=&Apache::lonnet::EXT("resource.0.interval"); |
my $hastimeleft; |
|
if (@interval > 1) { |
if (@interval > 1) { |
my $first_access=&Apache::lonnet::get_first_access($interval[1]); |
my $first_access=&Apache::lonnet::get_first_access($interval[1]); |
if ($first_access > 0) { |
if ($first_access > 0) { |