From 9b150dfcf118fa4a31a60566decca6211811a3ca Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ask=20Bj=C3=B8rn=20Hansen?= <ask@develooper.com>
Date: Wed, 23 Apr 2003 03:36:36 +0000
Subject: [PATCH] Fix bug hiding the error message when an existing
 configuration file isn't readable.

git-svn-id: https://svn.perl.org/qpsmtpd/trunk@145 958fd67b-6ff1-0310-b445-bb7760255be9
---
 Changes        | 3 +++
 lib/Qpsmtpd.pm | 2 +-
 2 files changed, 4 insertions(+), 1 deletion(-)

diff --git a/Changes b/Changes
index 1414edd..36b1a4b 100644
--- a/Changes
+++ b/Changes
@@ -1,5 +1,8 @@
 0.26-dev
 
+  Fix bug hiding the error message when an existing configuration file
+  isn't readable.
+
   If a plugin running the ehlo hook add something to the ARRAY
   reference $self->transaction->notes('capabilities') then it will be
   added to the EHLO response.
diff --git a/lib/Qpsmtpd.pm b/lib/Qpsmtpd.pm
index d09b4dd..7f24e27 100644
--- a/lib/Qpsmtpd.pm
+++ b/lib/Qpsmtpd.pm
@@ -77,7 +77,7 @@ sub get_qmail_config {
     return \%h;
   }
 
-  open CF, "<$configfile" or warn "$$ could not open configfile $configfile: $!", return;
+  open CF, "<$configfile" or warn "$$ could not open configfile $configfile: $!" and return;
   my @config = <CF>;
   chomp @config;
   @config = grep { $_ and $_ !~ m/^\s*#/ and $_ =~ m/\S/} @config;