aboutsummaryrefslogtreecommitdiffstats
path: root/lib/Reaction/UI/Widget/SiteLayout.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Reaction/UI/Widget/SiteLayout.pm')
-rw-r--r--lib/Reaction/UI/Widget/SiteLayout.pm18
1 files changed, 17 insertions, 1 deletions
diff --git a/lib/Reaction/UI/Widget/SiteLayout.pm b/lib/Reaction/UI/Widget/SiteLayout.pm
index dc9574a..fce46e2 100644
--- a/lib/Reaction/UI/Widget/SiteLayout.pm
+++ b/lib/Reaction/UI/Widget/SiteLayout.pm
@@ -2,16 +2,32 @@ package Reaction::UI::Widget::SiteLayout;
use Reaction::UI::WidgetClass;
use aliased 'Reaction::UI::Widget::Container';
+use MooseX::Types::Moose 'HashRef';
class SiteLayout is Container, which {
+ has 'http_header' => (
+ isa => HashRef, is => 'rw',
+ default => sub { {} }
+ );
+
after fragment widget {
arg static_base => $_{viewport}->static_base_uri;
arg title => $_{viewport}->title;
};
implements fragment meta_info {
- render meta_member => over [keys %{$_{viewport}->meta_info}];
+ my $self = shift;
+ if ( $_{viewport}->meta_info->{'http_header'} ) {
+ $self->http_header( delete $_{viewport}->meta_info->{'http_header'} );
+ render 'meta_http_header' => over [keys %{$self->http_header}];
+ }
+ render 'meta_member' => over [keys %{$_{viewport}->meta_info}];
+ };
+
+ implements fragment meta_http_header {
+ arg 'meta_name' => $_;
+ arg 'meta_value' => shift->http_header->{$_};
};
implements fragment meta_member {