Merge branch 'np/log-graph-octopus-fix' into maint
[gitweb.git] / t / t0019 / parse_json.perl
index ca4e5bfa7850ee5bc783cec7c0d18b8d76d66883..fea87fb81b62d4f1e9612094c60ee8dceebc07be 100644 (file)
@@ -34,6 +34,9 @@ sub dump_item {
     } elsif (ref($value) eq 'HASH') {
        print "$label_in hash\n";
        dump_hash($label_in, $value);
+    } elsif (ref $value) {
+       my $bool = $value ? 1 : 0;
+       print "$label_in $bool\n";
     } elsif (defined $value) {
        print "$label_in $value\n";
     } else {