From: Thomas Hochstein <thh@inter.net>
Date: Wed, 14 Apr 2010 07:38:23 +0000 (+0200)
Subject: readconfig(): Add file name to verbose output.
X-Git-Tag: v0.8~9
X-Git-Url: https://code.th-h.de/?p=usenet%2Fyapfaq.git;a=commitdiff_plain;h=b802358a609325e98df470b14827ff01a06f47ee;ds=sidebyside

readconfig(): Add file name to verbose output.

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

diff --git a/yapfaq.pl b/yapfaq.pl
index 816f195..9819864 100644
--- a/yapfaq.pl
+++ b/yapfaq.pl
@@ -166,7 +166,7 @@ sub readconfig{
   my ($File, $Config, $Faq) = @_;
   my ($LastEntry, $Error, $i) = ('','',0);
 
-  print "Reading configuration.\n" if($Options{'v'});
+  print "Reading configuration from $$File.\n" if($Options{'v'});
 
   open FH, "<$$File" or die "$0: E: Can't open $$File: $!";
   while (<FH>) {