From a4e85cd9681021fc66a2b19aa0258abeae5fc3d5 Mon Sep 17 00:00:00 2001 From: Ian Jackson Date: Sun, 3 May 2020 22:56:56 +0100 Subject: [PATCH] nailing-cargo: Flailings with TOML, *sigh* Signed-off-by: Ian Jackson --- nailing-cargo | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/nailing-cargo b/nailing-cargo index 92bd8ce..ed95576 100755 --- a/nailing-cargo +++ b/nailing-cargo @@ -40,6 +40,7 @@ # subdir use strict; +use TOML::Parser; use TOML; use POSIX; use Fcntl qw(LOCK_EX); @@ -67,10 +68,11 @@ sub read_or_enoent ($) { sub toml_or_enoent ($$) { my ($f,$what) = @_; + my $parser = TOML::Parser->new(); my $toml = read_or_enoent($f) // return; - my ($v,$e) = from_toml($toml); - die "$self: parse TOML: $what: $f: $e\n" unless defined $v; - die "$e ?" if length $e; + my $v = $parser->parse($toml); +# die "$self: parse TOML: $what: $f: $e\n" unless defined $v; +# die "$e ?" if length $e; $v; } -- 2.30.2