version 1.232, 2009/04/29 15:20:54
|
version 1.233, 2009/05/27 13:29:47
|
Line 1262 ENDDEL
|
Line 1262 ENDDEL
|
if ($disuri=~/\/default$/) { |
if ($disuri=~/\/default$/) { |
my $dir=$disuri; |
my $dir=$disuri; |
$dir=~s/default$//; |
$dir=~s/default$//; |
$displayfile=&mt('Default Metadata for Directory [_1]',$dir); |
$displayfile=&mt('Default Metadata for Directory [_1]' |
|
,'<span class="LC_filename">'.$dir.'</span>'); |
} |
} |
%Apache::lonpublisher::metadatafields=(); |
%Apache::lonpublisher::metadatafields=(); |
%Apache::lonpublisher::metadatakeys=(); |
%Apache::lonpublisher::metadatakeys=(); |
Line 1289 ENDDEL
|
Line 1290 ENDDEL
|
} |
} |
} |
} |
$r->print(<<ENDEDIT); |
$r->print(<<ENDEDIT); |
<h1>$displayfile</h1> |
<p>$displayfile</p> |
<form method="post" action="" name="defaultmeta"> |
<form method="post" action="" name="defaultmeta"> |
ENDEDIT |
ENDEDIT |
my %lt=&fieldnames($file_type); |
my %lt=&fieldnames($file_type); |
Line 1381 ENDEDIT
|
Line 1382 ENDEDIT
|
$lt{$field_name} = $$added_metadata_fields{$field_name}; |
$lt{$field_name} = $$added_metadata_fields{$field_name}; |
} |
} |
} |
} |
$output .= &Apache::loncommon::start_data_table(); |
$output .= &Apache::lonhtmlcommon::start_pick_box(); |
my $row_alt = 1; |
my $last = $#fields + 1; |
|
my $rowcount = 0; |
foreach my $field_name (@fields) { |
foreach my $field_name (@fields) { |
|
$rowcount++; |
if (defined($env{'form.new_'.$field_name})) { |
if (defined($env{'form.new_'.$field_name})) { |
my @values = &Apache::loncommon::get_env_multiple('form.new_'.$field_name); |
my @values = &Apache::loncommon::get_env_multiple('form.new_'.$field_name); |
my $newvalue = ''; |
my $newvalue = ''; |
Line 1402 ENDEDIT
|
Line 1405 ENDEDIT
|
($field_name eq 'courserestricted'))&& |
($field_name eq 'courserestricted'))&& |
(!($env{$Apache::lonpublisher::metadatafields{'courserestricted'}.'.metadata.'.$field_name.'.options'} =~ m/deleted/))){ |
(!($env{$Apache::lonpublisher::metadatafields{'courserestricted'}.'.metadata.'.$field_name.'.options'} =~ m/deleted/))){ |
|
|
$output .= "\n".&Apache::loncommon::start_data_table_row(); |
$output .= &Apache::lonhtmlcommon::row_title($lt{$field_name}) |
$output .= ('<td><span class="LC_metadata">'.$lt{$field_name}.':</span></td><td> '. |
.&prettyinput($field_name, |
&prettyinput($field_name, |
|
$Apache::lonpublisher::metadatafields{$field_name}, |
$Apache::lonpublisher::metadatafields{$field_name}, |
'new_'.$field_name,'defaultmeta', |
'new_'.$field_name,'defaultmeta', |
undef,undef,undef,undef, |
undef,undef,undef,undef, |
$Apache::lonpublisher::metadatafields{'courserestricted'}).'</td>'); |
$Apache::lonpublisher::metadatafields{'courserestricted'}); |
$output .= &Apache::loncommon::end_data_table_row(); |
$output .= &Apache::lonhtmlcommon::row_closure($rowcount == $last?1:0); |
} |
} |
} else { |
} else { |
|
|
$output.=(&Apache::loncommon::start_data_table_row().'<td><span class="LC_metadata">'.$lt{$field_name}.':</span></td><td> '. |
$output .= &Apache::lonhtmlcommon::row_title($lt{$field_name}) |
&prettyinput($field_name, |
.&prettyinput($field_name, |
$Apache::lonpublisher::metadatafields{$field_name}, |
$Apache::lonpublisher::metadatafields{$field_name}, |
'new_'.$field_name,'defaultmeta').'</td>'.&Apache::loncommon::end_data_table_row()); |
'new_'.$field_name,'defaultmeta') |
|
.&Apache::lonhtmlcommon::row_closure($rowcount == $last?1:0); |
|
|
} |
} |
} |
} |
$output .= &Apache::loncommon::end_data_table(); |
$output .= &Apache::lonhtmlcommon::end_pick_box(); |
if ($env{'form.store'}) { |
if ($env{'form.store'}) { |
my ($outcome,$result) = &store_metadata($fn,$uri,'store'); |
my ($outcome,$result) = &store_metadata($fn,$uri,'store'); |
$r->print($result); |
$r->print($result); |
} |
} |
$r->print($output.'<br /><input type="submit" title="'.&mt('Save Metadata').'" name="store" value="'. |
my $savebutton = '<p><input type="submit" name="store"' |
&mt('Save').'" />'); |
.' value="'.&mt('Save').'" title="'.&mt('Save Metadata').'" /></p>'; |
|
$r->print($savebutton.$output.$savebutton); |
|
|
if ($file_type eq 'portfolio' || $file_type eq 'groups') { |
if ($file_type eq 'portfolio' || $file_type eq 'groups') { |
my ($port_path,$group) = &get_port_path_and_group($uri); |
my ($port_path,$group) = &get_port_path_and_group($uri); |
Line 1499 sub store_metadata {
|
Line 1503 sub store_metadata {
|
print $mfh ($file_content); |
print $mfh ($file_content); |
close($mfh); |
close($mfh); |
&update_metadata_table($uri); |
&update_metadata_table($uri); |
$output .= '<p class="LC_success">'; |
my $confirmtext; |
if ($caller eq 'transfer') { |
if ($caller eq 'transfer') { |
$output .= &mt('Transferred data in added fields to notes'); |
$confirmtext = &mt('Transferred data in added fields to notes'); |
} else { |
} else { |
$output .= &mt('Wrote Metadata'); |
$confirmtext = &mt('Wrote Metadata'); |
} |
} |
$output .= ' '.&Apache::lonlocal::locallocaltime(time). |
$output .= &Apache::loncommon::confirmwrapper( |
'</p>'; |
&Apache::lonhtmlcommon::confirm_success( |
|
$confirmtext.' '.&Apache::lonlocal::locallocaltime(time))); |
$outcome = 'ok'; |
$outcome = 'ok'; |
} |
} |
} |
} |