From: Don Armstrong <don@donarmstrong.com>
Date: Mon, 24 Sep 2007 07:10:21 +0000 (+0000)
Subject: add some debugging information
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=474ba5805bc80d2b02dea53af4c9de58825e3d34;p=bin.git

add some debugging information
---

diff --git a/delay_mail b/delay_mail
index c7d1799..dbe7d0d 100755
--- a/delay_mail
+++ b/delay_mail
@@ -195,6 +195,7 @@ elsif ($options{list}) {
 	  next if $entry !~ /^\d+$/;
 	  # they're also just readable files
 	  next if not -f $entry or not -r $entry;
+	  print STDERR "Still dealing with $entry\n" if $DEBUG;
 	  push @queue,parse_queue_entry($entry);
      }
      for my $q_e (@queue) {