From 7d1fdc9a6bc9ead4596a4f92115b556547da42f0 Mon Sep 17 00:00:00 2001 From: pdbogen Date: Mon, 3 Nov 2008 03:32:19 +0000 Subject: [PATCH] Remove old debugging git-svn-id: https://www.cernu.us/~pdbogen/svn/destult2@77 088b83a4-0077-4247-935c-42ec02c2848b --- irc.pl | 4 ---- 1 file changed, 4 deletions(-) diff --git a/irc.pl b/irc.pl index 71b3a62..ac8d92e 100644 --- a/irc.pl +++ b/irc.pl @@ -223,10 +223,6 @@ sub send_public_to { use Data::Dumper; my $self = $heap->{ "self" }; my $no_throttle = $target->{ "no_throttle" }; - print( - "n_t: ".$no_throttle."\n". - "s-t: ".$self->{ "throttle" }."\n". - "len: ".length($msg)."\n" ); if( $target->{ "dest" } =~ /^[#&][a-zA-Z0-9-_]+$/ ) { if( $no_throttle || !$self->{ "throttle" } || length $msg <= 354 ) { print( "IRC : =>".$target->{ "dest" }.": $msg\n" ); -- 2.11.0