From e507fbca30840ad7962dba78328ee4f6e32b739b Mon Sep 17 00:00:00 2001 From: timriker Date: Fri, 18 Feb 2005 01:06:55 +0000 Subject: [PATCH] stray prints git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@1135 c11ca15a-4712-0410-83d8-924469b57eb5 --- src/Modules/Zippy.pl | 2 +- src/Modules/insult.pl | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/src/Modules/Zippy.pl b/src/Modules/Zippy.pl index b608fb9..1d493f9 100644 --- a/src/Modules/Zippy.pl +++ b/src/Modules/Zippy.pl @@ -13,7 +13,7 @@ my $no_zippy; # Can't think of any situation in which this won't work.. sub zippy::get { my @yows; - print "Reading...\n"; + &::DEBUG("Reading zippy data"); while () { chomp; push @yows, $_; diff --git a/src/Modules/insult.pl b/src/Modules/insult.pl index 561e5b1..4ff90ee 100644 --- a/src/Modules/insult.pl +++ b/src/Modules/insult.pl @@ -14,7 +14,7 @@ sub Insult { my @adjs; my @amts; my @nouns; - print "Reading...\n"; + &::DEBUG("Reading insult data"); while () { chomp; push(@adjs, split(" ", $1)) if /^adj\s*(.*)/; -- 2.39.5