X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FReaction%2FUI%2FViewPort%2FField%2FString.pm;h=ec7e2951c6556db50f0aa6d9b7e22f679eedfc4c;hb=7ccc8c7269babcb98aaf696200251959b3022c4d;hp=4be6bdce7cf529919df0b0baed1796c0ded994bb;hpb=7adfd53f17f66ffe93763e944ed1d3fc52a369dc;p=catagits%2FReaction.git

diff --git a/lib/Reaction/UI/ViewPort/Field/String.pm b/lib/Reaction/UI/ViewPort/Field/String.pm
index 4be6bdc..ec7e295 100644
--- a/lib/Reaction/UI/ViewPort/Field/String.pm
+++ b/lib/Reaction/UI/ViewPort/Field/String.pm
@@ -1,34 +1,14 @@
 package Reaction::UI::ViewPort::Field::String;
 
 use Reaction::Class;
+use aliased 'Reaction::UI::ViewPort::Field';
 
-class String is 'Reaction::UI::ViewPort::Field', which {
+use namespace::clean -except => [ qw(meta) ];
+extends Field;
 
-  has '+value' => (isa => 'Str'); # accept over 255 chars in case, upstream
-                                  # constraint from model should catch it
-  
-  has '+layout' => (default => 'textfield');
 
-};
+has '+value' => (isa => 'Str');
+__PACKAGE__->meta->make_immutable;
 
-1;  
 
-=head1 NAME
-
-Reaction::UI::ViewPort::Field::String
-
-=head1 DESCRIPTION
-
-=head1 SEE ALSO
-
-=head2 L<Reaction::UI::ViewPort::Field>
-
-=head1 AUTHORS
-
-See L<Reaction::Class> for authors.
-
-=head1 LICENSE
-
-See L<Reaction::Class> for the license.
-
-=cut
+1;