[MOBY-guts] biomoby commit

[Mark Wilkinson]

mwilkinson
Tue Apr 20 19:24:25 EDT 2004
Update of /home/repository/moby/moby-live/Perl/scripts
In directory pub.open-bio.org:/tmp/cvs-serv15701/scripts

Modified Files:
	testMOBYClientCentral_v05.pl 
Log Message:
backing out incorrect changes I just committed

moby-live/Perl/scripts testMOBYClientCentral_v05.pl,1.14,1.15
===================================================================
RCS file: /home/repository/moby/moby-live/Perl/scripts/testMOBYClientCentral_v05.pl,v
retrieving revision 1.14
retrieving revision 1.15
diff -u -r1.14 -r1.15
--- /home/repository/moby/moby-live/Perl/scripts/testMOBYClientCentral_v05.pl	2004/04/20 23:19:29	1.14
+++ /home/repository/moby/moby-live/Perl/scripts/testMOBYClientCentral_v05.pl	2004/04/20 23:24:25	1.15
@@ -5,7 +5,7 @@
     ($reg, $test, $expect) = @_;
     die "\a\a\aREG OBJECT MALFORMED" unless $reg;
     if ($reg->success == $expect){
-        print "test $test\t\t[PASS]",($reg->registration_id),"\n";
+        print "test $test\t\t[PASS]\n";
     } else {
         print "test $test\t\t[FAIL]\n",$reg->message,"\n\n";
     }