--- trunk/lib/Frey/ClassBrowser.pm 2008/11/27 17:37:52 554
+++ trunk/lib/Frey/ClassBrowser.pm 2008/11/27 17:39:00 555
@@ -4,6 +4,7 @@
extends 'Frey::ClassLoader';
with 'Frey::Web';
with 'Frey::Session';
+with 'Frey::Web::CombineImages';
use Frey::Run;
use Data::Dump qw/dump/;
@@ -18,6 +19,7 @@
sub as_markup {
my $self = shift;
my $row;
+ my @icons;
my $usage = $self->session_dump( $self->usage );
#warn "# usage ",dump( $usage );
@@ -29,7 +31,10 @@
Frey::Web->meta->apply( $self );
}
$icon = $self->icon_path( $class );
- $icon = qq|| if $icon;
+ if ($icon) {
+ push @icons, $icon;
+ $icon = qq||;
+ }
my $html
= qq|