From 01a074f699c0c6f80a87436c0620d7e4684755d9 Mon Sep 17 00:00:00 2001
From: Don Armstrong <don@donarmstrong.com>
Date: Mon, 24 Sep 2007 07:10:58 +0000
Subject: [PATCH] add some debugging information

---
 delay_mail | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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