r31500@martha (orig r1229): purge | 2009-09-11 05:51:11 -0400
[catagits/Reaction.git] / lib / Reaction / UI / ViewPort / SiteLayout.pm
index a8ee133..227e8ac 100644 (file)
@@ -1,19 +1,20 @@
 package Reaction::UI::ViewPort::SiteLayout;
 
 use Reaction::Class;
-use aliased 'Reaction::UI::ViewPort';
+extends 'Reaction::UI::ViewPort';
 
-class SiteLayout is ViewPort, which {
+use namespace::clean -except => [ qw(meta) ];
+use MooseX::Types::Moose qw/Str HashRef/;
 
-  has 'title' => (isa => 'Str', is => 'rw', lazy_fail => 1);
+has 'title' => (isa => Str, is => 'rw', lazy_fail => 1);
+has 'static_base_uri' => (isa => Str, is => 'rw', lazy_fail => 1);
+has 'meta_info' => (
+  is => 'rw',
+  isa => HashRef,
+  required => 1,
+  default => sub { {} }
+);
 
-  has 'static_base_uri' => (isa => 'Str', is => 'rw', lazy_fail => 1);
-
-  has 'meta_info' => (
-         is => 'rw', isa => 'HashRef',
-         required => '1', default => sub { {} }
-  );
-
-};
+__PACKAGE__->meta->make_immutable;
 
 1;