--- loncom/interface/lonmeta.pm 2006/09/29 18:11:49 1.180 +++ loncom/interface/lonmeta.pm 2006/10/06 19:04:29 1.181 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Metadata display handler # -# $Id: lonmeta.pm,v 1.180 2006/09/29 18:11:49 albertel Exp $ +# $Id: lonmeta.pm,v 1.181 2006/10/06 19:04:29 banghart Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1246,6 +1246,7 @@ ENDEDIT } } foreach my $field_name(keys (%$added_metadata_fields)) { + push (@fields,$field_name); $lt{$field_name} = $$added_metadata_fields{$field_name}; } @@ -1257,8 +1258,12 @@ ENDEDIT if ($Apache::lonpublisher::metadatafields{'courserestricted'} ne 'none' && exists($env{$Apache::lonpublisher::metadatafields{'courserestricted'}.'.metadata.'.$field_name.'.options'})) { # handle restrictions here - if (($env{$Apache::lonpublisher::metadatafields{'courserestricted'}.'.metadata.'.$field_name.'.options'} =~ m/active/) || - ($field_name eq 'courserestricted')){ + if ($env{$Apache::lonpublisher::metadatafields{'courserestricted'}.'.metadata.'.$field_name.'.options'} =~ m/deleted/) { + &Apache::lonnet::logthis("the options field ".$env{$Apache::lonpublisher::metadatafields{'courserestricted'}.'.metadata.'.$field_name.'.options'}); + } + 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}.': '. &prettyinput($field_name, $Apache::lonpublisher::metadatafields{$field_name},