Fix broken implementation of "Program" in .yapfaqrc.

Fixes #4.

Signed-off-by: Thomas Hochstein <thh@inter.net>

diff --git a/yapfaq.pl b/yapfaq.pl
index 97e4b78..5af5f8d 100644 (file)
--- a/yapfaq.pl
+++ b/yapfaq.pl
@@ -66,7 +66,7 @@ if (-f $RCFile) {
   warn "$0: W: .rc file $RCFile does not exist!\n";
 }
 
   warn "$0: W: .rc file $RCFile does not exist!\n";
 }
 

-$Options{'s'} = $Config{'Program'} if (!defined($Options{'s'}));
+$Options{'s'} = $Config{'Program'} if (defined($Config{'Program'}) && $Config{'Program'} && !defined($Options{'s'}));

 
 # read configuration (configured FAQs)
 my @Config;
 
 # read configuration (configured FAQs)
 my @Config;