--- trunk/lib/Frey/CSS/Area.pm 2009/01/05 13:50:27 919 +++ trunk/lib/Frey/CSS/Area.pm 2009/01/07 00:04:46 955 @@ -11,11 +11,10 @@ =cut -has skeleton => ( +has sponge => ( is => 'rw', - isa => 'Str', + isa => 'Sponge', required => 1, - default => 'skeleton', ); sub as_markup { @@ -24,33 +23,26 @@ $self->add_css( 'static/Frey/CSS/Area.css' ); $self->add_js ( 'static/Frey/CSS/Area.js' ); - qq| - - - - -
-
-Click on the table or graph to switch view -
- + my $html + = qq|| + ; + + $html .= qq| +
+
+ Click on the table or graph to switch view +
|; + + return $html; } 1;