--- loncom/interface/lonmeta.pm 2006/09/13 22:08:07 1.176 +++ loncom/interface/lonmeta.pm 2006/09/25 19:24:49 1.178 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Metadata display handler # -# $Id: lonmeta.pm,v 1.176 2006/09/13 22:08:07 banghart Exp $ +# $Id: lonmeta.pm,v 1.178 2006/09/25 19:24:49 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1185,7 +1185,7 @@ ENDEDIT my $output; my @fields; my $added_metadata_fields; - if ($file_type eq 'portfolio') { + if ($file_type eq 'portfolio' || $file_type eq 'groups') { if(exists ($env{$Apache::lonpublisher::metadatafields{'courserestricted'}.'.metadata.fieldlist'})) { # retrieve fieldnames (in order) from the course restricted list @fields = (split /,/,$env{$Apache::lonpublisher::metadatafields{'courserestricted'}.'.metadata.fieldlist'}); @@ -1281,7 +1281,7 @@ ENDEDIT foreach my $field (sort keys %Apache::lonpublisher::metadatafields) { next if ($field =~ /\./); my $unikey=$field; - $unikey=~/^([A-Za-z]+)/; + $unikey=~/^([A-Za-z_]+)/; my $tag=$1; $tag=~tr/A-Z/a-z/; $file_content.= "\n\<$tag";