[MOBY-guts] biomoby commit

[Mark Wilkinson]

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

Modified Files:
	ServiceInstanceRDF.pm 
Log Message:
added support for secondary parameters to the RDF generation routine

moby-live/Perl/MOBY/RDF ServiceInstanceRDF.pm,1.7,1.8
===================================================================
RCS file: /home/repository/moby/moby-live/Perl/MOBY/RDF/ServiceInstanceRDF.pm,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -r1.7 -r1.8
--- /home/repository/moby/moby-live/Perl/MOBY/RDF/ServiceInstanceRDF.pm	2004/07/29 23:34:06	1.7
+++ /home/repository/moby/moby-live/Perl/MOBY/RDF/ServiceInstanceRDF.pm	2004/08/17 17:15:36	1.8
@@ -100,6 +100,8 @@
     
     my $outputs = $service->output;
 
+    my $secondary = $service->secondary;
+
     my $InputArticles = MOBY::RDF::InOutArticlesRDF->new(
                                                          model => $model,
                                                          type => 'consumes',
@@ -114,6 +116,12 @@
                                                          articles => $outputs,
                                                         );
                                                           
+    my $SecondaryArticles = MOBY::RDF::InOutArticlesRDF->new(
+                                                         model => $model,
+                                                         type => 'consumes',
+                                                         subject => $subject,
+                                                         articles => $secondary,
+                                                        );
 
 }