[MOBY-guts] biomoby commit

[Mark Wilkinson]

mwilkinson
Thu Jul 28 11:39:47 EDT 2005
Update of /home/repository/moby/moby-live/Perl/MOBY
In directory pub.open-bio.org:/tmp/cvs-serv4168/MOBY

Modified Files:
	OntologyServer.pm 
Log Message:
passing wrong parameter to delete_service and delete_namespace

moby-live/Perl/MOBY OntologyServer.pm,1.64,1.65
===================================================================
RCS file: /home/repository/moby/moby-live/Perl/MOBY/OntologyServer.pm,v
retrieving revision 1.64
retrieving revision 1.65
diff -u -r1.64 -r1.65
--- /home/repository/moby/moby-live/Perl/MOBY/OntologyServer.pm	2005/07/27 18:06:50	1.64
+++ /home/repository/moby/moby-live/Perl/MOBY/OntologyServer.pm	2005/07/28 15:39:47	1.65
@@ -680,7 +680,7 @@
 		return ( 0, qq{Service type $term has dependencies in the ontology},
 				 $lsid );
 	}
-	my ($err, $errstr) = $adaptor->delete_service(service_lsid => $lsid);
+	my ($err, $errstr) = $adaptor->delete_service(type => $lsid);
 
 	if ( $err ) {
 		return ( 0, "Delete from Service Type table failed: $errstr",
@@ -820,7 +820,7 @@
 				 $lsid );
 	}
 
-	my ($err, $errstr) = $adaptor->delete_namespace(namespace_lsid => $lsid);
+	my ($err, $errstr) = $adaptor->delete_namespace(type => $lsid);
 
 	if ( $err ) {
 		return ( 0, "Delete from namespace table failed: $errstr",