version 1.484.2.17, 2012/12/13 04:11:51
|
version 1.484.2.18, 2012/12/13 04:15:30
|
Line 312 sub group_import {
|
Line 312 sub group_import {
|
return &storemap($coursenum, $coursedom, $folder.'.'.$container,1); |
return &storemap($coursenum, $coursedom, $folder.'.'.$container,1); |
} |
} |
|
|
sub breadcrumbs { |
|
my ($allowed,$crstype)=@_; |
|
&Apache::lonhtmlcommon::clear_breadcrumbs(); |
|
my (@folders); |
|
if ($env{'form.pagepath'}) { |
|
@folders = split('&',$env{'form.pagepath'}); |
|
} else { |
|
@folders=split('&',$env{'form.folderpath'}); |
|
} |
|
my $folderpath; |
|
my $plain=''; |
|
my $randompick=-1; |
|
my $isencrypted=0; |
|
my $ishidden=0; |
|
my $is_random_order=0; |
|
while (@folders) { |
|
my $folder=shift(@folders); |
|
my $foldername=shift(@folders); |
|
if ($folderpath) {$folderpath.='&';} |
|
$folderpath.=$folder.'&'.$foldername; |
|
my $url; |
|
if ($allowed) { |
|
$url = '/adm/coursedocs?folderpath='; |
|
} else { |
|
$url = '/adm/supplemental?folderpath='; |
|
} |
|
$url .= &escape($folderpath); |
|
my $name=&unescape($foldername); |
|
# randompick number, hidden, encrypted, random order, is appended with ":"s to the foldername |
|
$name=~s/\:(\d*)\:(\w*)\:(\w*):(\d*)$//; |
|
if ($1 ne '') { |
|
$randompick=$1; |
|
} else { |
|
$randompick=-1; |
|
} |
|
if ($2) { $ishidden=1; } |
|
if ($3) { $isencrypted=1; } |
|
if ($4 ne '') { $is_random_order = 1; } |
|
if ($folder eq 'supplemental') { |
|
$name = &mt('Supplemental '.$crstype.' Content'); |
|
} |
|
&Apache::lonhtmlcommon::add_breadcrumb( |
|
{'href'=>$url, |
|
'title'=>$name, |
|
'text'=>$name, |
|
'no_mt'=>1, |
|
}); |
|
$plain.=$name.' > '; |
|
} |
|
$plain=~s/\>\;\s*$//; |
|
return (&Apache::lonhtmlcommon::breadcrumbs(undef,undef,0,'nohelp', |
|
undef, undef, 1 ),$randompick,$ishidden, |
|
$isencrypted,$plain,$is_random_order); |
|
} |
|
|
|
sub log_docs { |
sub log_docs { |
return &Apache::lonnet::write_log('course','docslog',@_); |
return &Apache::lonnet::write_log('course','docslog',@_); |
} |
} |
Line 464 sub docs_change_log {
|
Line 409 sub docs_change_log {
|
if ($supplementalflag) { |
if ($supplementalflag) { |
$tid = 2; |
$tid = 2; |
} |
} |
my ($breadcrumbtrail) = &breadcrumbs($allowed,$crstype); |
my ($breadcrumbtrail) = |
|
&Apache::lonhtmlcommon::docs_breadcrumbs($allowed,$crstype,1); |
$r->print($breadcrumbtrail. |
$r->print($breadcrumbtrail. |
&generate_edit_table($tid,\%orderhash,undef,$iconpath,$jumpto, |
&generate_edit_table($tid,\%orderhash,undef,$iconpath,$jumpto, |
$readfile)); |
$readfile)); |
Line 1749 sub editor {
|
Line 1695 sub editor {
|
: 'sequence'; |
: 'sequence'; |
|
|
my ($breadcrumbtrail,$randompick,$ishidden,$isencrypted,$plain,$is_random_order) = |
my ($breadcrumbtrail,$randompick,$ishidden,$isencrypted,$plain,$is_random_order) = |
&breadcrumbs($allowed,$crstype); |
&Apache::lonhtmlcommon::docs_breadcrumbs($allowed,$crstype,1); |
$r->print($breadcrumbtrail); |
$r->print($breadcrumbtrail); |
|
|
my $jumpto = "uploaded/$coursedom/$coursenum/$folder.$container"; |
my $jumpto = "uploaded/$coursedom/$coursenum/$folder.$container"; |
Line 2459 $form_common."\n".
|
Line 2405 $form_common."\n".
|
$form_start. |
$form_start. |
$form_common.' |
$form_common.' |
<span class="LC_nobreak"><label><input type="checkbox" name="randomorder_'.$orderidx.'" onclick="'."this.form.changeparms.value='randomorder';this.form.submit()".'" '.$ro_set.' /> '.&mt('Random Order').' </label></span></form>'; |
<span class="LC_nobreak"><label><input type="checkbox" name="randomorder_'.$orderidx.'" onclick="'."this.form.changeparms.value='randomorder';this.form.submit()".'" '.$ro_set.' /> '.&mt('Random Order').' </label></span></form>'; |
|
} elsif ($supplementalflag && !$allowed) { |
|
$url .= ($url =~ /\?/) ? 'amp;':'?'; |
|
$url .= 'folderpath='.&HTML::Entities::encode($esc_path,'<>&"'); |
} |
} |
if ($ispage) { |
if ($ispage) { |
my $pagename=&escape($pagetitle); |
my $pagename=&escape($pagetitle); |