summaryrefslogtreecommitdiff
path: root/Echolot
diff options
context:
space:
mode:
authorPeter Palfrader <peter@palfrader.org>2002-07-03 00:56:02 +0000
committerPeter Palfrader <peter@palfrader.org>2002-07-03 00:56:02 +0000
commit5f7f3b35267319db3d9fb1b9ee918d1d38689c11 (patch)
tree1068e9343049bbb214affb0d26e10a26e6ccc583 /Echolot
parent8e615cad321491bade30622b120a4a6fbeff02b3 (diff)
some verbose output
Diffstat (limited to 'Echolot')
-rw-r--r--Echolot/Storage/File.pm5
1 files changed, 4 insertions, 1 deletions
diff --git a/Echolot/Storage/File.pm b/Echolot/Storage/File.pm
index cca5015..c0f050b 100644
--- a/Echolot/Storage/File.pm
+++ b/Echolot/Storage/File.pm
@@ -1,7 +1,7 @@
package Echolot::Storage::File;
# (c) 2002 Peter Palfrader <peter@palfrader.org>
-# $Id: File.pm,v 1.20 2002/07/03 00:54:40 weasel Exp $
+# $Id: File.pm,v 1.21 2002/07/03 00:56:02 weasel Exp $
#
=pod
@@ -918,6 +918,9 @@ sub expire($) {
sub delete_remailer($$) {
my ($self, $address) = @_;
+ print "Deleting remailer $address\n"
+ if Echolot::Config::get()->{'verbose'};
+
unless (defined $self->{'METADATA'}->{'addresses'}->{$address}) {
delete $self->{'METADATA'}->{'addresses'}->{$address}
} else {