version 1.405, 2009/10/27 09:19:52
|
version 1.407, 2009/10/30 20:24:39
|
Line 3016 HIDDENFORM
|
Line 3016 HIDDENFORM
|
|
|
my $activeClass = 1; |
my $activeClass = 1; |
my $active = ''; |
my $active = ''; |
|
my %tabtitles = ( |
|
main => { |
|
Course => &mt('Main Course Documents'), |
|
Community => &mt('Main Community Documents'), |
|
}, |
|
supplemental => { |
|
Course => &mt('Supplemental Course Documents'), |
|
Community => &mt('Supplemental Community Documents'), |
|
}, |
|
); |
if ($allowed) { |
if ($allowed) { |
$r->print('<ul class="LC_TabContentBigger" id="mainnav">'); |
$r->print('<ul class="LC_TabContentBigger" id="mainnav">'); |
if (($standard) && ($allowed) && (!$forcesupplement) && (($env{'form.folderpath'}=~/^default/) || $env{'form.folderpath'}eq"" || ($env{'form.pagepath'}))) { |
if (($standard) && ($allowed) && (!$forcesupplement) && (($env{'form.folderpath'}=~/^default/) || $env{'form.folderpath'}eq"" || ($env{'form.pagepath'}))) { |
Line 3025 HIDDENFORM
|
Line 3034 HIDDENFORM
|
$activeClass = 0; |
$activeClass = 0; |
} |
} |
} |
} |
$r->print('<li '.$active.' onclick="javascript:showPage(this,\'mainCourseDocuments\',\'mainnav\',\'maincoursedoc\');"><a href="#"><b>'.&mt('Main Course Documents').'</b></a></li>'); |
$r->print('<li '.$active.' onclick="javascript:showPage(this,\'mainCourseDocuments\',\'mainnav\',\'maincoursedoc\');"><a href="#"><b>'.$tabtitles{'main'}{$type}.'</b></a></li>'); |
$active = ''; |
$active = ''; |
if (!$forcestandard || ($env{'form.folderpath'}=~/^supplemental/)) { |
if (!$forcestandard || ($env{'form.folderpath'}=~/^supplemental/)) { |
if($activeClass == 1){ |
if($activeClass == 1){ |
$active = 'class="active"'; |
$active = 'class="active"'; |
} |
} |
} |
} |
$r->print('<li '.$active.' onclick="javascript:showPage(this,\'supplCourseDocuments\',\'mainnav\',\'maincoursedoc\');"><a href="#"><b>'.&mt('Supplemental Course Documents').'</b></a></li>'); |
$r->print('<li '.$active.' onclick="javascript:showPage(this,\'supplCourseDocuments\',\'mainnav\',\'maincoursedoc\');"><a href="#"><b>'.$tabtitles{'supplemental'}{$type}.'</b></a></li>'); |
$r->print('</ul>'); |
$r->print('</ul>'); |
} else { |
} else { |
$r->print('<br />'); |
$r->print('<br />'); |
Line 3051 HIDDENFORM
|
Line 3060 HIDDENFORM
|
if ($folder eq '' || $folder=~/^supplemental/) { |
if ($folder eq '' || $folder=~/^supplemental/) { |
$folder='default'; |
$folder='default'; |
$savefolderpath = $env{'form.folderpath'}; |
$savefolderpath = $env{'form.folderpath'}; |
$env{'form.folderpath'}='default&'.&escape(&mt('Main '.$type.' Documents')); |
$env{'form.folderpath'}='default&'.&escape($tabtitles{'main'}{$type}); |
$uploadtag = '<input type="hidden" name="folderpath" value="'. |
$uploadtag = '<input type="hidden" name="folderpath" value="'. |
&HTML::Entities::encode($env{'form.folderpath'},'<>&"').'" />'; |
&HTML::Entities::encode($env{'form.folderpath'},'<>&"').'" />'; |
} |
} |
Line 3275 my %orderhash = (
|
Line 3284 my %orderhash = (
|
'dd' => ['Tools', create_form_ul(create_list_elements(@tools)).&generate_admin_options($containertag,$uploadtag,\%help,\%env)], |
'dd' => ['Tools', create_form_ul(create_list_elements(@tools)).&generate_admin_options($containertag,$uploadtag,\%help,\%env)], |
); |
); |
my $tid='1'; |
my $tid='1'; |
my $varcd = 'Main Course Documents'; |
|
$hadchanges=0; |
$hadchanges=0; |
my $error = &editor($r,$coursenum,$coursedom,$folder,$allowed,'',$type); |
my $error = &editor($r,$coursenum,$coursedom,$folder,$allowed,'',$type); |
if ($error) { |
if ($error) { |
Line 3286 my $varcd = 'Main Course Documents';
|
Line 3294 my $varcd = 'Main Course Documents';
|
} |
} |
|
|
&changewarning($r,''); |
&changewarning($r,''); |
$r->print(&generate_edit_table($tid,$varcd,\%orderhash)); |
$r->print(&generate_edit_table($tid,\%orderhash)); |
|
|
$r->print('</div>'); |
$r->print('</div>'); |
} |
} |
Line 3395 my %suporderhash = (
|
Line 3403 my %suporderhash = (
|
$r->print('<p><span class="LC_error">'.$error.'</span></p>'); |
$r->print('<p><span class="LC_error">'.$error.'</span></p>'); |
} |
} |
my $tid='2'; |
my $tid='2'; |
my $varscd = 'Supplemental Course Documents'; |
$r->print(&generate_edit_table($tid,\%suporderhash)); |
$r->print(&generate_edit_table($tid,$varscd,\%suporderhash)); |
|
} else { |
} else { |
my $error = &editor($r,$coursenum,$coursedom,$folder,$allowed,'',$type); |
my $error = &editor($r,$coursenum,$coursedom,$folder,$allowed,'',$type); |
if ($error) { |
if ($error) { |
Line 3461 sub generate_admin_options {
|
Line 3468 sub generate_admin_options {
|
|
|
|
|
sub generate_edit_table { |
sub generate_edit_table { |
my ($tid,$varcd,$orderhash_ref) = @_; |
my ($tid,$orderhash_ref) = @_; |
|
return unless(ref($orderhash_ref) eq 'HASH'); |
my %orderhash = %{$orderhash_ref}; |
my %orderhash = %{$orderhash_ref}; |
my $form; |
my $form; |
my $activetab; |
my $activetab; |