} 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}) {