From: minima <minima>
Date: Thu, 4 Oct 2001 15:52:51 +0000 (+0000)
Subject: remove debugging
X-Git-Tag: R_1_49~57
X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=commitdiff_plain;h=f415973f5f2afa49403e76a1fc1dec29a71be950;p=spider.git

remove debugging
---

diff --git a/perl/BadWords.pm b/perl/BadWords.pm
index b598c385..05e764fc 100644
--- a/perl/BadWords.pm
+++ b/perl/BadWords.pm
@@ -102,7 +102,6 @@ sub check
 	my $s = uc shift;
 	my @out;
 
-	dbg($s) if isdbg('badword');
 	push @out, &$regexcode($s) if $regexcode;
 	
 	return @out if @out;