[MOBY-guts] biomoby commit

[Mark Wilkinson]

mwilkinson
Tue Jan 11 16:49:50 EST 2005
Update of /home/repository/moby/moby-live/Perl/MOBY/Adaptor/moby/queryapi
In directory pub.open-bio.org:/tmp/cvs-serv15452/MOBY/Adaptor/moby/queryapi

Modified Files:
	mysql.pm 
Log Message:
error in the sql statement that writes collection inputs and outputs.  The service_instance_id should be NULL for collections

moby-live/Perl/MOBY/Adaptor/moby/queryapi mysql.pm,1.6,1.7
===================================================================
RCS file: /home/repository/moby/moby-live/Perl/MOBY/Adaptor/moby/queryapi/mysql.pm,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -r1.6 -r1.7
--- /home/repository/moby/moby-live/Perl/MOBY/Adaptor/moby/queryapi/mysql.pm	2004/07/30 01:14:44	1.6
+++ /home/repository/moby/moby-live/Perl/MOBY/Adaptor/moby/queryapi/mysql.pm	2005/01/11 21:49:49	1.7
@@ -136,7 +136,8 @@
 		($args{object_type_uri},
 		$args{namespace_type_uris},
 		$args{article_name},
-		$args{service_instance_id},
+# here
+		$args{collection_input_id}?'':$args{service_instance_id},
 		$args{collection_input_id}));
 	my $id=$dbh->{mysql_insertid};
 	return $id;
@@ -158,7 +159,8 @@
 		($args{object_type_uri},
 		$args{namespace_type_uris},
 		$args{article_name},
-		$args{service_instance_id},
+# and here
+		$args{collection_output_id}?'',$args{service_instance_id},
 		$args{collection_output_id}));
 	my $id=$dbh->{mysql_insertid};
 	return $id;