--- trunk/lib/Frey/Web/IFrame.pm 2008/12/26 01:01:37 906 +++ trunk/lib/Frey/Web/IFrame.pm 2008/12/26 01:32:09 907 @@ -1,18 +1,7 @@ package Frey::Web::IFrame; -use Moose; +use Moose::Role; -extends 'Frey'; -with 'Frey::Web'; -#with 'Frey::Storage'; - -has skeleton => ( - is => 'rw', - isa => 'Str', - required => 1, - default => 'skeleton', -); - -sub as_markup { +sub iframe_html { my ($self) = @_; $self->add_js(q` @@ -36,18 +25,15 @@ } `); - my $html = qq| + return qq|
- |; - - $html .= $self->iframe_open('/Frey::Web::IFrame','introspect in iframe'); - - return $html; + | + ; } sub iframe_open {