diff options
author | groditi <groditi@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7> | 2008-01-02 22:57:32 +0000 |
---|---|---|
committer | groditi <groditi@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7> | 2008-01-02 22:57:32 +0000 |
commit | 36d54b146cfba17f5c7757eced453429ee31c780 (patch) | |
tree | b6b64cdf2c279bc7337c3dad7043f43e57e64de2 /lib/Reaction/UI/ViewPort.pm | |
parent | c03f75a7322e8194591d2f8bd02fb3f83df8833f (diff) | |
download | reaction-36d54b146cfba17f5c7757eced453429ee31c780.tar.gz reaction-36d54b146cfba17f5c7757eced453429ee31c780.zip |
choosemany is still broken (not applying changes) but everything else is looking better
Diffstat (limited to 'lib/Reaction/UI/ViewPort.pm')
-rw-r--r-- | lib/Reaction/UI/ViewPort.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/Reaction/UI/ViewPort.pm b/lib/Reaction/UI/ViewPort.pm index 8cc6917..d7c1980 100644 --- a/lib/Reaction/UI/ViewPort.pm +++ b/lib/Reaction/UI/ViewPort.pm @@ -1,6 +1,7 @@ package Reaction::UI::ViewPort; use Reaction::Class; +use Scalar::Util qw/blessed/; class ViewPort which { @@ -15,7 +16,6 @@ class ViewPort which { isa => 'HashRef', is => 'ro', default => sub { {} } ); has ctx => (isa => 'Catalyst', is => 'ro', required => 1); - has column_order => (is => 'rw'); implements _build_layout => as { ''; @@ -60,6 +60,8 @@ class ViewPort which { implements apply_child_events => as { my ($self, $ctx, $events) = @_; foreach my $child ($self->child_event_sinks) { + confess blessed($child) ."($child) is not a valid object" + unless blessed($child) && $child->can('apply_events'); $child->apply_events($ctx, $events); } }; |