X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=br.pl;fp=br.pl;h=2e3099107957884bb234e6838bc01b80286bc0d6;hb=861950c2bb6aad5228871684a27e0bf908e70857;hp=2c63bd166dbff9850bf84e803301083b7323df87;hpb=8347d3a1f3cbea26ffec25a3cb8dadf44ba37ad3;p=scpubgit%2FJSON-Tree-Viewer.git

diff --git a/br.pl b/br.pl
index 2c63bd1..2e30991 100644
--- a/br.pl
+++ b/br.pl
@@ -210,9 +210,11 @@ sub render_el {
       } elsif ($whole->{name}) {
         return $self->link_to($whole->{name}, $key);
       }
-      $part = '(complex)';
     }
-    return join(', ', @$part);
+    return join ', ', @$part
+      if @$part < 5;
+    use HTML::Tags;
+    return <ul>, (map { (<li>, $_, </li>) } @$part), </ul>;
   }
   if (ref($part) eq 'HASH') {
     if ($whole->{key}) {