[MOBY-guts] biomoby commit

[Mark Wilkinson]

mwilkinson
Mon Sep  1 11:57:58 EDT 2003
Update of /home/repository/moby/moby-live/Perl/MOBY/Client
In directory pub.open-bio.org:/tmp/cvs-serv9867/Perl/MOBY/Client

Modified Files:
	Central.pm 
Log Message:
Catherine noticed that the synopsis of MOBY::Client::Central was not runnable.  It is now.

moby-live/Perl/MOBY/Client Central.pm,1.50,1.51
===================================================================
RCS file: /home/repository/moby/moby-live/Perl/MOBY/Client/Central.pm,v
retrieving revision 1.50
retrieving revision 1.51
diff -u -r1.50 -r1.51
--- /home/repository/moby/moby-live/Perl/MOBY/Client/Central.pm	2003/08/18 15:02:47	1.50
+++ /home/repository/moby/moby-live/Perl/MOBY/Client/Central.pm	2003/09/01 15:57:58	1.51
@@ -28,9 +28,11 @@
  my ($Services, $REG) = $Central->findService(
 	    input =>[
               [DNASequence => ['NCBI_gi', 'NCBI_Acc']],
-                ]);
+                ],
+		expandObjects => 1
+		);
  unless ($Services){
-	 print "Service discovery failed with the following errror: "
+	 print "Service discovery failed with the following errror: ";
 	 print $REG->message;
 	 end
  }