--- loncom/interface/lonmeta.pm 2006/09/13 22:08:07 1.176 +++ loncom/interface/lonmeta.pm 2006/09/19 19:58:41 1.177 @@ -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.177 2006/09/19 19:58:41 banghart Exp $ # # Copyright Michigan State University Board of Trustees # @@ -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";