From 5ad1c0e821a5aaafe47dbe79d5f69820fde798bd Mon Sep 17 00:00:00 2001
From: Lorenz Kästle <12514511+RincewindsHat@users.noreply.github.com>
Date: Fri, 7 Mar 2025 09:09:45 +0100
Subject: Implement JSON output parsing for tests

---
 NPTest.pm | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'NPTest.pm')

diff --git a/NPTest.pm b/NPTest.pm
index 9b25ac3e..47773acc 100644
--- a/NPTest.pm
+++ b/NPTest.pm
@@ -15,6 +15,8 @@ use warnings;
 use Cwd;
 use File::Basename;
 
+use JSON;
+
 use IO::File;
 use Data::Dumper;
 
@@ -617,6 +619,8 @@ sub testCmd {
     chomp $output;
     $object->output($output);
 
+    $object->{'mp_test_result'} = decode_json($output);
+
     alarm(0);
 
     my ($pkg, $file, $line) = caller(0);
-- 
cgit v1.2.3-74-g34f1