diff options
Diffstat (limited to 'lib/RHRD/utils.pm')
-rwxr-xr-x | lib/RHRD/utils.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lib/RHRD/utils.pm b/lib/RHRD/utils.pm index 3835851..13e8ca1 100755 --- a/lib/RHRD/utils.pm +++ b/lib/RHRD/utils.pm @@ -28,7 +28,7 @@ use DateTime; use DateTime::TimeZone; use LWP::Simple; use URI::Fetch; -use JSON; +use JSON::MaybeXS; sub get_rd_week { @@ -178,7 +178,8 @@ sub fetch_parse_json my $json = $res->content; my $data; eval { - $data = from_json($json); + my $j = JSON::MaybeXS->new(utf8 => 0); + $data = $j->decode($json); 1; } or do { return (0, "error parsing import result"); |