Test suite: Canonicalise json output when generating aq

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>

diff --git a/tests/lib b/tests/lib
index 38605bd9359e2f9200b1d4737ef3f235f60887e7..f1ffa8b11563219b2f3082a591fca04ed4d16c9c 100644 (file)
--- a/tests/lib
+++ b/tests/lib
@@ -253,7 +253,8 @@ t-archive-updated () {
                        "filename" => "$4",
                };
                END {
-                       print to_json \@v or die $!;
+                       my $json = JSON->new->canonical();
+                       print $json->encode(\@v) or die $!;
                }
        '
 }