From 205ce37e7d1cfc4e447e66dadaaf3512c99d9adc Mon Sep 17 00:00:00 2001
From: Peter Palfrader <peter@palfrader.org>
Date: Tue, 14 Jan 2003 05:31:11 +0000
Subject: Forgot to convert a few things to real logging

---
 Echolot/Conf.pm | 11 ++++-------
 1 file changed, 4 insertions(+), 7 deletions(-)

diff --git a/Echolot/Conf.pm b/Echolot/Conf.pm
index 9504ae6..6516380 100644
--- a/Echolot/Conf.pm
+++ b/Echolot/Conf.pm
@@ -1,7 +1,7 @@
 package Echolot::Conf;
 
 # (c) 2002 Peter Palfrader <peter@palfrader.org>
-# $Id: Conf.pm,v 1.34 2003/01/14 05:25:34 weasel Exp $
+# $Id: Conf.pm,v 1.35 2003/01/14 05:31:11 weasel Exp $
 #
 
 =pod
@@ -68,8 +68,7 @@ sub send_requests($;$) {
 				$which eq 'all' ||
 				(($which eq '') && ($this_call_id == (Echolot::Tools::makeShortNumHash($address.$type.$session_id) % $send_every_n_calls))));
 
-			print "Sending $type requests to ".$address."\n"
-				if Echolot::Config::get()->{'verbose'};
+			Echolot::Log::info("Sending $type requests to ".$address.".");
 
 			my $source_text = Echolot::Config::get()->{'remailerxxxtext'};
 			my $template =  HTML::Template->new(
@@ -98,8 +97,7 @@ sub check_resurrection() {
 		next unless ($remailer->{'status'} eq 'ttl timeout');
 		next unless ($remailer->{'fetch'});
 		next unless ($remailer->{'resurrection_ttl'});
-		print "Sending requests to ".$remailer->{'address'}." to check for resurrection\n"
-			if Echolot::Config::get()->{'verbose'};
+		Echolot::Log::info("Sending requests to ".$remailer->{'address'}." to check for resurrection.");
 		for my $type (qw{conf key help stats adminkey}) {
 			Echolot::Tools::send_message(
 				'To' => $remailer->{'address'},
@@ -218,8 +216,7 @@ sub set_caps_manually($$) {
 		Echolot::Log::info("Caps not defined."),
 		return 0;
 
-	print "Setting caps for $addr manually to $caps\n"
-		if Echolot::Config::get()->{'verbose'};
+	Echolot::Log::info("Setting caps for $addr manually to $caps.");
 
 	my $remailer = Echolot::Globals::get()->{'storage'}->get_address($addr);
 	defined $remailer or
-- 
cgit v1.2.3