From 86b3eccf806b3193546b6f85a64b30446e501542 Mon Sep 17 00:00:00 2001
From: Christian Pointner <equinox@helsinki.at>
Date: Wed, 23 Mar 2016 20:35:41 +0100
Subject: fixed show list output


diff --git a/rh-bin/showlist.json b/rh-bin/showlist.json
index 185a0a5..8c28ad8 100755
--- a/rh-bin/showlist.json
+++ b/rh-bin/showlist.json
@@ -42,7 +42,7 @@ if(defined $ctx) {
       my %show;
       $show{'id'} = $href->{'ID'};
       $show{'title'} = $href->{'ID'} . " | " . $href->{'TITLE'};
-      push @showlist, %show;
+      push @showlist, \%show;
     }
     $responsecode = 200;
     $status = "OK";
@@ -58,4 +58,4 @@ $answer{'shows'} = \@showlist;
 
 print "Content-type: application/json; charset=UTF-8\n";
 print "Status: $responsecode\n\n";
-print encode_json \%answer;
+print JSON->new->encode(\%answer);
-- 
cgit v0.10.2