[MOBY-guts] biomoby commit

[Eddie Kawas]

kawas
Wed May 14 10:04:03 EDT 2008
Update of /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/Client
In directory dev.open-bio.org:/tmp/cvs-serv12267/Perl/MOBY-Server/lib/MOBY/Client

Modified Files:
	Central.pm 
Log Message:
category 'cgi' is what the registry expects. fixed instances in the code that 'post' was used, rather than 'cgi'
moby-live/Perl/MOBY-Server/lib/MOBY/Client Central.pm,1.4,1.5
===================================================================
RCS file: /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/Client/Central.pm,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -r1.4 -r1.5
--- /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/Client/Central.pm	2008/05/12 15:05:28	1.4
+++ /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/Client/Central.pm	2008/05/14 14:04:03	1.5
@@ -640,7 +640,7 @@
      authURI      => $authURI,      
      contactEmail => "your at mail.address",      
      description => $human_readable_description, 
-     category  =>  "moby" | "post" | "moby-async"
+     category  =>  "moby" | "cgi" | "moby-async"
      URL    =>  $URL_TO_SERVICE  (or URL to WSDL document for wsdl-type services)
 
     input:	listref; (articleName may be undef) 
@@ -738,13 +738,13 @@
 
 #____________________________________________________________________________________________
 	return $self->errorRegXML(
-"Only 'moby', 'post', 'moby-async', 'doc-literal', 'doc-literal-async' Service Categories are currently allowed - you gave me $Category"
+"Only 'moby', 'cgi', 'moby-async', 'doc-literal', 'doc-literal-async' Service Categories are currently allowed - you gave me $Category"
 	  )
 	  unless ( ( $Category eq 'moby' )
 			  || ( $Category eq 'moby-async' )
 			  || ( $Category eq 'doc-literal' )
 			  || ( $Category eq 'doc-literal-async' )
-			  || ( $Category eq 'post' ));
+			  || ( $Category eq 'cgi' ));
 	return $self->errorRegXML(
 "All Fields Required:  serviceName, serviceType, authURI, contactEmail, URL, description, Category, input, output, secondary"
 	  )
@@ -971,7 +971,7 @@
      serviceType  => $serviceType,  (optional)
      authURI      => $authURI,      (optional)
      authoritative => 1,    (optional)
-     category  =>  "moby" | "post" | "moby-async"  (optional)
+     category  =>  "moby" | "cgi" | "moby-async"  (optional)
      expandObjects => 1,    (optional)
      expandServices => 1,    (optional)
      URL    =>  $URL_TO_SERVICE    (optional)