cleanup of hard to read layout_args code

[catagits/Reaction.git] / lib / Reaction / UI / ViewPort / Image.pm

diff --git a/lib/Reaction/UI/ViewPort/Image.pm b/lib/Reaction/UI/ViewPort/Image.pm
index a531e50..cd763ef 100644 (file)
--- a/lib/Reaction/UI/ViewPort/Image.pm
+++ b/lib/Reaction/UI/ViewPort/Image.pm
@@ -4,12 +4,48 @@ use Reaction::Class;
 use namespace::clean -except => [ qw(meta) ];
 extends 'Reaction::UI::ViewPort';
 
-has uri => ( is => 'rw', isa => 'URI', required => 1);
-has width => ( is => 'rw', isa => 'Int');
-has height => ( is => 'rw', isa => 'Int');
+use MooseX::Types::URI qw/Uri/;
+use MooseX::Types::Moose qw/Int/;
+
+has uri => ( is => 'rw', isa => Uri, required => 1);
+has width => ( is => 'rw', isa => Int);
+has height => ( is => 'rw', isa => Int);
 
 __PACKAGE__->meta->make_immutable;
 
 1;
 
 __END__;
+
+
+=head1 NAME
+
+Reaction::UI::ViewPort::Image
+
+=head1 DESCRIPTION
+
+A Viewport to display an image.
+
+=head1 ATTRIBUTES
+
+=head2 uri
+
+Required URI object pointing to the image to be displayed.
+
+=head2 width
+
+Optional width in pixels.
+
+=head2 height
+
+Optional height in pixels.
+
+=head1 AUTHORS
+
+See L<Reaction::Class> for authors.
+
+=head1 LICENSE
+
+See L<Reaction::Class> for the license.
+
+=cut