version 1.126, 2005/11/11 22:46:56
|
version 1.127, 2005/11/15 19:20:12
|
Line 1101 ENDEDIT
|
Line 1101 ENDEDIT
|
$Apache::lonpublisher::metadatafields{$_}= |
$Apache::lonpublisher::metadatafields{$_}= |
join(',',&Apache::loncommon::get_env_multiple('form.new_'.$_)); |
join(',',&Apache::loncommon::get_env_multiple('form.new_'.$_)); |
} |
} |
|
my $field_name = $_; |
if ($metacourse ne 'none') { |
if ($metacourse ne 'none') { |
# handle restrictions here |
# handle restrictions here |
if (($env{$metacourse.'.metadata.'.$_.'.options'} =~ m/active/)|| |
if ($env{$metacourse.'.metadata.'.$_.'.options'} =~ m/active/){ |
($_ eq 'courserestricted')) { |
|
$output.=('<p>'.$lt{$_}.': '. |
$output.=('<p>'.$lt{$_}.': '. |
&prettyinput($_, |
&prettyinput($_, |
$Apache::lonpublisher::metadatafields{$_}, |
$Apache::lonpublisher::metadatafields{$_}, |
'new_'.$_,'defaultmeta',undef,undef,undef,undef,$metacourse).'</p>'); |
'new_'.$_,'defaultmeta',undef,undef,undef,undef,$metacourse).'</p>'); |
} |
} elsif ($_ eq 'courserestricted') { |
|
$output.=( |
|
&prettyinput($field_name, |
|
$Apache::lonpublisher::metadatafields{$_}, |
|
'new_'.$field_name,'defaultmeta',undef,undef,undef,undef,$metacourse)); |
|
} |
} else { |
} else { |
$output.=('<p>'.$lt{$_}.': '. |
if ($_ ne 'courserestricted') { |
|
$output.=('<p>'.$lt{$_}.': '. |
&prettyinput($_, |
&prettyinput($_, |
$Apache::lonpublisher::metadatafields{$_}, |
$Apache::lonpublisher::metadatafields{$_}, |
'new_'.$_,'defaultmeta').'</p>'); |
'new_'.$_,'defaultmeta').'</p>'); |
|
} else { |
|
$output.=&prettyinput($field_name, |
|
$Apache::lonpublisher::metadatafields{$_}, |
|
'new_'.$field_name,'defaultmeta'); |
|
} |
} |
} |
} |
} |
|
$output.=('<p>'.$lt{$_}.': '. |
|
&prettyinput($_, |
|
$Apache::lonpublisher::metadatafields{$_}, |
|
'new_'.$_,'defaultmeta',undef,undef,undef,undef,$metacourse).'</p>'); |
|
|
if ($env{'form.store'}) { |
if ($env{'form.store'}) { |
my $mfh; |
my $mfh; |
my $formname='store'; |
my $formname='store'; |