From 21f5756fba91a90b5c841af7e975e22289a75954 Mon Sep 17 00:00:00 2001
From: Gerhard Gonter <ggonter@gmail.com>
Date: Sun, 22 Sep 2019 20:37:11 +0200
Subject: [PATCH] link to File::Slurper functions, when available
---
modules/util/Util/JSON.pm | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/modules/util/Util/JSON.pm b/modules/util/Util/JSON.pm
index 29c6d3d..a4119d9 100755
--- a/modules/util/Util/JSON.pm
+++ b/modules/util/Util/JSON.pm
@@ -7,15 +7,15 @@ BEGIN {
eval {
require File::Slurper;
- # *read_text= File::Slurper::read_text;
- # *write_text= File::Slurper::write_text;
+ *read_text= *File::Slurper::read_text;
+ *write_text= *File::Slurper::write_text;
};
if ($@)
{
print STDERR "defining read_text ourselves\n";
*read_text= *x_read_text;
- *write_text= *x_wirte_text;
+ *write_text= *x_write_text;
}
}
--
GitLab