[MOBY-guts] biomoby commit

[Mark Wilkinson]

mwilkinson
Thu Jul 29 21:14:44 EDT 2004
Update of /home/repository/moby/moby-live/Perl/MOBY
In directory pub.open-bio.org:/tmp/cvs-serv22099/MOBY

Modified Files:
	Central.pm 
Log Message:
last tweaks to provide protection to services that have a signatureURL.

moby-live/Perl/MOBY Central.pm,1.137,1.138
===================================================================
RCS file: /home/repository/moby/moby-live/Perl/MOBY/Central.pm,v
retrieving revision 1.137
retrieving revision 1.138
diff -u -r1.137 -r1.138
--- /home/repository/moby/moby-live/Perl/MOBY/Central.pm	2004/07/30 00:40:09	1.137
+++ /home/repository/moby/moby-live/Perl/MOBY/Central.pm	2004/07/30 01:14:44	1.138
@@ -1432,7 +1432,7 @@
 	return &_error("The service specified by authority=$authURI servicename=$serviceName does not exist in the registry", "") unless (MOBY::service_instance->new(servicename => $serviceName, authority_uri => $authURI, test => 1));
 	my $SERVICE = MOBY::service_instance->new(servicename => $serviceName, authority_uri => $authURI);
 	if ($SERVICE->signatureURL){
-    	return &_error("it is illegal to register a service that has a signatureURL.  Such services must be deregistered by deleting the RDF at the location identified by the signatureURL","");
+    	return &_error("it is illegal to deregister a service that has a signatureURL.  Such services must be deregistered by deleting the RDF at the location identified by the signatureURL","");
     }
         
     my $result = $SERVICE->DELETE_THYSELF;