thh/yapfaq
1
0
Fork 0
Code Issues 1 Pull requests Projects Releases Packages Activity

readconfig(): Add file name to verbose output.

Browse source 
Signed-off-by: Thomas Hochstein <thh@inter.net>
This commit is contained in:
Thomas Hochstein 2010-04-14 09:38:23 +02:00
parent 7ef63844b5
commit b802358a60
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
yapfaq.pl
View file

@ -166,7 +166,7 @@ sub readconfig{
my ($File, $Config, $Faq) = @_; my ($File, $Config, $Faq) = @_;
my ($LastEntry, $Error, $i) = ('','',0); 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: $!"; open FH, "<$$File" or die "$0: E: Can't open $$File: $!";
while (<FH>) { while (<FH>) {