[MOBY-guts] biomoby commit

[Mark Wilkinson]

mwilkinson
Thu May  8 14:35:29 EDT 2003
Update of /home/repository/moby/moby-live/Perl/MOBY
In directory pub.open-bio.org:/tmp/cvs-serv2805/Perl/MOBY

Modified Files:
	Central.pm 
Log Message:
got the perl client to create correct XML for service registration
moby-live/Perl/MOBY Central.pm,1.32,1.33
===================================================================
RCS file: /home/repository/moby/moby-live/Perl/MOBY/Central.pm,v
retrieving revision 1.32
retrieving revision 1.33
diff -u -r1.32 -r1.33
--- /home/repository/moby/moby-live/Perl/MOBY/Central.pm	2003/05/08 18:34:01	1.32
+++ /home/repository/moby/moby-live/Perl/MOBY/Central.pm	2003/05/08 18:35:29	1.33
@@ -3308,10 +3308,10 @@
 
 sub _LOG {
 	#return unless $debug;
-	print join "\n", @_;
-	print  "\n---\n";
-	return;
-	open LOG, ">>/tmp/CentralRegistryLogOut.txt" or die "can't open logfile $!\n";
+	#print join "\n", @_;
+	#print  "\n---\n";
+	#return;
+	#open LOG, ">>/tmp/CentralRegistryLogOut.txt" or die "can't open logfile $!\n";
 	print LOG join "\n", @_;
 	print LOG "\n---\n";
 	close LOG;