[MOBY-guts] biomoby commit

[Dennis Wang]

dwang
Thu Jul 28 15:26:58 EDT 2005
Update of /home/repository/moby/moby-live/Perl/MOBY/Adaptor/moby/queryapi
In directory pub.open-bio.org:/tmp/cvs-serv5338/Perl/MOBY/Adaptor/moby/queryapi

Modified Files:
	mysql.pm 
Log Message:
should be querying for collection_output_id instead of collection_input_id in delete_simple_output

moby-live/Perl/MOBY/Adaptor/moby/queryapi mysql.pm,1.60,1.61
===================================================================
RCS file: /home/repository/moby/moby-live/Perl/MOBY/Adaptor/moby/queryapi/mysql.pm,v
retrieving revision 1.60
retrieving revision 1.61
diff -u -r1.60 -r1.61
--- /home/repository/moby/moby-live/Perl/MOBY/Adaptor/moby/queryapi/mysql.pm	2005/07/28 18:33:10	1.60
+++ /home/repository/moby/moby-live/Perl/MOBY/Adaptor/moby/queryapi/mysql.pm	2005/07/28 19:26:58	1.61
@@ -413,7 +413,7 @@
     my ($collid) = $args{collection_output_id};
     my $statement1; my $statement2;
     $siid && ($statement1 = "delete from simple_output where service_instance_id = ?");
-    $collid && ($statement2 = "delete from simple_output where collection_input_id = ?");
+    $collid && ($statement2 = "delete from simple_output where collection_output_id = ?");
     
     $siid && ($dbh->do( $statement1, undef,($siid)));
     $collid && ($dbh->do($statement2, undef,($collid)));