From 877ed447705745566e862dfacc6d70dc184bb6d6 Mon Sep 17 00:00:00 2001
From: Don Armstrong <don@donarmstrong.com>
Date: Mon, 17 Aug 2009 13:20:01 -0700
Subject: [PATCH] warn if there isn't a configuration file, but continue

---
 Debbugs/Config.pm | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/Debbugs/Config.pm b/Debbugs/Config.pm
index eeea764..b75bd0b 100644
--- a/Debbugs/Config.pm
+++ b/Debbugs/Config.pm
@@ -991,6 +991,10 @@ set_default(\%config,'html_expire_note',
 
 sub read_config{
      my ($conf_file) = @_;
+     if (not -e $conf_file) {
+	 print STDERR "configuration file '$conf_file' doesn't exist; skipping it";
+	 return;
+     }
      # first, figure out what type of file we're reading in.
      my $fh = new IO::File $conf_file,'r'
 	  or die "Unable to open configuration file $conf_file for reading: $!";
-- 
2.39.2