Update to non-obsolete usage, per warnings

diff --git a/archives/bin/generate-list-descriptions b/archives/bin/generate-list-descriptions
index 8c1b422ccb25d042d4c950d004493d96876a197f..565989dbc5e1cddde9b2c5d440e6ad94f812a25e 100755 (executable)
--- a/archives/bin/generate-list-descriptions
+++ b/archives/bin/generate-list-descriptions
@@ -66,7 +66,7 @@ sub writefile {
 
        my $tmpfile = "$filename.new";
        if (open TMPOUT, ">", $tmpfile) {
-               print TMPOUT $json->objToJson($data);
+               print TMPOUT $json->to_json($data);
                close TMPOUT;
                rename $tmpfile, $filename;
        }