diff options
| -rwxr-xr-x | client | 2 | ||||
| -rwxr-xr-x | lacme | 2 | 
2 files changed, 2 insertions, 2 deletions
| @@ -85,7 +85,7 @@ my $NONCE;  #  my $CONFIG = do { -    my $conf = do { local $/ = undef, <$CONFFILE> }; +    my $conf = do { local $/ = undef; <$CONFFILE> };      close $CONFFILE or die "Can't close: $!";      my $h = Config::Tiny::->read_string($conf) or die Config::Tiny::->errstr()."\n";      $h->{_} //= {}; @@ -77,7 +77,7 @@ do {      die "Error: Can't find configuration file\n" unless defined $CONFFILENAME;      print STDERR "Using configuration file: $CONFFILENAME\n" if $OPTS{debug};      open $CONFFILE, '<', $CONFFILENAME or die "Can't open $CONFFILENAME: $!\n"; -    my $conf = do { local $/ = undef, <$CONFFILE> }; +    my $conf = do { local $/ = undef; <$CONFFILE> };      # don't close $CONFFILE so we can pass it to the client      my $h = Config::Tiny::->read_string($conf) or die Config::Tiny::->errstr()."\n"; | 
