From 05aafaa0c740d7a17e6e3f17634ae6990187f22d Mon Sep 17 00:00:00 2001 From: Guilhem Moulin Date: Sun, 19 Feb 2017 12:28:39 +0100 Subject: wibble --- client | 2 +- lacme | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/client b/client index 3bf0bad..cd94ed8 100755 --- a/client +++ b/client @@ -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->{_} //= {}; diff --git a/lacme b/lacme index cb49818..1951ed7 100755 --- a/lacme +++ b/lacme @@ -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"; -- cgit v1.2.3