From: pdbogen <pdbogen@088b83a4-0077-4247-935c-42ec02c2848b>
Date: Mon, 3 Nov 2008 03:32:19 +0000 (+0000)
Subject: Remove old debugging
X-Git-Url: http://git.mmlx.us/?a=commitdiff_plain;h=7d1fdc9a6bc9ead4596a4f92115b556547da42f0;p=destult.git

Remove old debugging

git-svn-id: https://www.cernu.us/~pdbogen/svn/destult2@77 088b83a4-0077-4247-935c-42ec02c2848b
---

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" );