diff options
Diffstat (limited to 'client')
| -rwxr-xr-x | client | 8 | 
1 files changed, 1 insertions, 7 deletions
| @@ -56,8 +56,6 @@ use Date::Parse ();  use LWP::UserAgent ();  use JSON (); -use Config::Tiny (); -  # Clean up PATH  $ENV{PATH} = join ':', qw{/usr/bin /bin};  delete @ENV{qw/IFS CDPATH ENV BASH_ENV/}; @@ -107,11 +105,7 @@ do {  my $CONFIG = do {      my $conf = do { local $/ = undef; <$CONFFILE> }; -    close $CONFFILE or die "close: $!"; -    my $h = Config::Tiny::->read_string($conf) or die Config::Tiny::->errstr()."\n"; -    $h->{_} //= {}; -    $h->{client}->{$_} //= $h->{_}->{$_} foreach keys %{$h->{_}}; # add defaults -    $h->{client}; +    JSON::->new->decode($conf);  };  my $UA = do {      my %args = %$CONFIG; | 
