diff options
author | Peter Palfrader <peter@palfrader.org> | 2003-02-18 06:38:34 +0000 |
---|---|---|
committer | Peter Palfrader <peter@palfrader.org> | 2003-02-18 06:38:34 +0000 |
commit | 4a14e35aa72f11b04fac87d1ebc8cf8f1e2828e1 (patch) | |
tree | 6efaaa4a5a31a08e387bfd658630cd81cc14a4b7 /Echolot/Chain.pm | |
parent | 8008d99c22778c8735d4ad24352a61e2d7c17d84 (diff) |
List From: headers
Diffstat (limited to 'Echolot/Chain.pm')
-rw-r--r-- | Echolot/Chain.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Echolot/Chain.pm b/Echolot/Chain.pm index dcf6647..1a380d7 100644 --- a/Echolot/Chain.pm +++ b/Echolot/Chain.pm @@ -1,7 +1,7 @@ package Echolot::Chain; # (c) 2002 Peter Palfrader <peter@palfrader.org> -# $Id: Chain.pm,v 1.8 2003/02/17 14:44:15 weasel Exp $ +# $Id: Chain.pm,v 1.9 2003/02/18 06:38:06 weasel Exp $ # =pod @@ -198,7 +198,7 @@ sub set_intensive_care($@) { %{$INTENSIVE_CARE{$chaintype}} = map { ($_->{'addr1'}.' '.$_->{'addr2'}) => $_->{'reason'} } @$intensive_care; if (scalar @$intensive_care) { - Echolot::Log::debug("intensive care $chaintype:\n" . join("\n", map { "\t\t$_: $INTENSIVE_CARE{$chaintype}->{$_}" } keys %{$INTENSIVE_CARE{$chaintype}} )); + Echolot::Log::debug("intensive care $chaintype:\n" . join("\n", map { "$_: $INTENSIVE_CARE{$chaintype}->{$_}" } keys %{$INTENSIVE_CARE{$chaintype}} )); } else { Echolot::Log::debug("intensive care $chaintype: (none)"); }; |