File devialog-0.9.0-distribution.patch of Package devialog

Index: devialog-0.9.0/devialog.pl
===================================================================
--- devialog-0.9.0.orig/devialog.pl
+++ devialog-0.9.0/devialog.pl
@@ -31,6 +31,12 @@ use Socket;
 use Mail::Sendmail;
 
 my $conf = 'devialog.conf';
+if ( ! -e "$conf" ){
+	$conf = '/etc/devialog.conf';
+	if ( ! -e "$conf" ){
+		die "No config found. Neither in current directory nor in /etc.\n";
+	}
+}
 
 my %opts;
 getopts('c:dhv', \%opts);
openSUSE Build Service is sponsored by