[MOBY-guts] biomoby commit

[Mark Wilkinson]

mwilkinson
Tue Aug 17 13:22:45 EDT 2004
Update of /home/repository/moby/moby-live/Perl/MOBY/RDF
In directory pub.open-bio.org:/tmp/cvs-serv22975/MOBY/RDF

Modified Files:
	InOutArticlesRDF.pm 
Log Message:
enum passes a listref not a list

moby-live/Perl/MOBY/RDF InOutArticlesRDF.pm,1.7,1.8
===================================================================
RCS file: /home/repository/moby/moby-live/Perl/MOBY/RDF/InOutArticlesRDF.pm,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -r1.7 -r1.8
--- /home/repository/moby/moby-live/Perl/MOBY/RDF/InOutArticlesRDF.pm	2004/07/29 16:11:40	1.7
+++ /home/repository/moby/moby-live/Perl/MOBY/RDF/InOutArticlesRDF.pm	2004/08/17 17:22:45	1.8
@@ -192,7 +192,7 @@
     _addClassLiteral($model, MP, $article, 'datatype',  $ART->datatype) if $ART->datatype;
     _addClassLiteral($model, MP, $article, 'max',  $ART->max) if $ART->max;
     _addClassLiteral($model, MP, $article, 'min',  $ART->min) if $ART->min;
-    my @enums = $ART->enum;
+    my @enums = @{$ART->enum};
     foreach (@enums){
         _addClassLiteral($model, MP, $article, 'enum',  $_) if defined $_;
     }