From f415973f5f2afa49403e76a1fc1dec29a71be950 Mon Sep 17 00:00:00 2001
From: minima <minima>
Date: Thu, 4 Oct 2001 15:52:51 +0000
Subject: [PATCH] remove debugging

---
 perl/BadWords.pm | 1 -
 1 file changed, 1 deletion(-)

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;
-- 
2.34.1