readconfig(): Add file name to verbose output.
Signed-off-by: Thomas Hochstein <thh@inter.net>
This commit is contained in:
parent
7ef63844b5
commit
b802358a60
|
@ -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>) {
|
||||||
|
|
Loading…
Reference in a new issue