summaryrefslogtreecommitdiff
path: root/fml
diff options
context:
space:
mode:
authorfukachan <fukachan>2001-07-31 13:49:50 +0000
committerfukachan <fukachan>2001-07-31 13:49:50 +0000
commit150706e87d9f5d5b60f257abec74d182e5a3a843 (patch)
tree465bcc8a10c507ee32b7ea83a685d620785c48fe /fml
parentbee0e7aa36bfc7705d1cd20eb977df17ed9979eb (diff)
downloadfml8-150706e87d9f5d5b60f257abec74d182e5a3a843.tar.gz
fml8-150706e87d9f5d5b60f257abec74d182e5a3a843.tar.bz2
fml8-150706e87d9f5d5b60f257abec74d182e5a3a843.zip
nuke debug
Diffstat (limited to 'fml')
-rw-r--r--fml/lib/Mail/Bounce/FixBrokenAddress.pm4
1 files changed, 1 insertions, 3 deletions
diff --git a/fml/lib/Mail/Bounce/FixBrokenAddress.pm b/fml/lib/Mail/Bounce/FixBrokenAddress.pm
index f8f0a494..fb4c4ca1 100644
--- a/fml/lib/Mail/Bounce/FixBrokenAddress.pm
+++ b/fml/lib/Mail/Bounce/FixBrokenAddress.pm
@@ -4,7 +4,7 @@
# All rights reserved. This program is free software; you can
# redistribute it and/or modify it under the same terms as Perl itself.
#
-# $FML: DSN.pm,v 1.8 2001/07/30 23:09:04 fukachan Exp $
+# $FML: FixBrokenAddress.pm,v 1.1 2001/07/31 12:58:34 fukachan Exp $
#
@@ -41,8 +41,6 @@ sub FixIt
{
my ($hint, $addr) = @_;
- print STDERR "Fixit($hint, $addr)\n";
-
# error address from nifty.ne.jp has no domain part ;)
if ($hint eq 'nifty.ne.jp' && $addr !~ /\@/) {
return( $addr . '@nifty.ne.jp' );