--- loncom/interface/lonmeta.pm 2006/10/23 21:09:21 1.185 +++ loncom/interface/lonmeta.pm 2006/11/20 20:58:30 1.189 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Metadata display handler # -# $Id: lonmeta.pm,v 1.185 2006/10/23 21:09:21 albertel Exp $ +# $Id: lonmeta.pm,v 1.189 2006/11/20 20:58:30 banghart Exp $ # # Copyright Michigan State University Board of Trustees # @@ -724,7 +724,7 @@ sub prettyinput { sub handler { my $r=shift; &Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'}, - ['currentpath']); + ['currentpath','changecourse']); my $uri=$r->uri; # # Set document type @@ -746,7 +746,18 @@ sub handler { if ($env{'form.store'}) { &present_editable_metadata($r,$uri,'portfolio'); } else { - &pre_select_course($r,$uri); + my $fn=&Apache::lonnet::filelocation('',$uri); + %Apache::lonpublisher::metadatafields=(); + %Apache::lonpublisher::metadatakeys=(); + my $result=&Apache::lonnet::getfile($fn); + &Apache::lonpublisher::metaeval($result); + &Apache::lonnet::logthis("restricted is: ".$Apache::lonpublisher::metadatafields{'courserestricted'}); + if ((!$Apache::lonpublisher::metadatafields{'courserestricted'}) || + ($env{'form.changecourse'} eq 'true')) { + &pre_select_course($r,$uri); + } else { + &present_editable_metadata($r,$uri,'portfolio'); + } } } elsif ($uri=~m|^/editupload/[^/]+/[^/]+/groups/|) { $r->print(&Apache::loncommon::start_page('Edit Group Portfolio File Catalog Information', @@ -1242,10 +1253,13 @@ ENDEDIT } if ($Apache::lonpublisher::metadatafields{'courserestricted'} ne 'none') { - $r->print(&mt('Associated with course [_1]',''.$env{$Apache::lonpublisher::metadatafields{'courserestricted'}.".description"}. - '').'
'); + $r->print(&mt('Associated with course [_1]', + ''. + $env{$Apache::lonpublisher::metadatafields{'courserestricted'}. + ".description"}. + '').'
'); } else { - $r->print("This resource is not associated with a course.
"); + $r->print('This resource is not associated with a course.
'); } } if (@added_order) { @@ -1259,6 +1273,8 @@ ENDEDIT $lt{$field_name} = $$added_metadata_fields{$field_name}; } } + $output .= &Apache::loncommon::start_data_table(); + my $row_alt = 1; foreach my $field_name (@fields) { if (defined($env{'form.new_'.$field_name})) { $Apache::lonpublisher::metadatafields{$field_name}= @@ -1270,22 +1286,26 @@ ENDEDIT if ((($env{$Apache::lonpublisher::metadatafields{'courserestricted'}.'.metadata.'.$field_name.'.options'} =~ m/active/) || ($field_name eq 'courserestricted'))&& (!($env{$Apache::lonpublisher::metadatafields{'courserestricted'}.'.metadata.'.$field_name.'.options'} =~ m/deleted/))){ - $output.=("\n".'

'.$lt{$field_name}.': '. + + $output .= "\n".&Apache::loncommon::start_data_table_row(); + $output .= (''.$lt{$field_name}.': '. &prettyinput($field_name, $Apache::lonpublisher::metadatafields{$field_name}, 'new_'.$field_name,'defaultmeta', undef,undef,undef,undef, - $Apache::lonpublisher::metadatafields{'courserestricted'}).'

'."\n"); + $Apache::lonpublisher::metadatafields{'courserestricted'}).''); + $output .= &Apache::loncommon::end_data_table_row(); } } else { - $output.=('

'.$lt{$field_name}.': '. + $output.=(&Apache::loncommon::start_data_table_row().''.$lt{$field_name}.': '. &prettyinput($field_name, $Apache::lonpublisher::metadatafields{$field_name}, - 'new_'.$field_name,'defaultmeta').'

'); + 'new_'.$field_name,'defaultmeta').''.&Apache::loncommon::end_data_table_row()); } } + $output .= &Apache::loncommon::end_data_table(); if ($env{'form.store'}) { my $mfh; my $formname='store';