diff options
author | wreis <wreis@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7> | 2009-08-28 00:38:34 +0000 |
---|---|---|
committer | wreis <wreis@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7> | 2009-08-28 00:38:34 +0000 |
commit | 29c740ee77384806aba50779b38132a1a9d31868 (patch) | |
tree | 9662e63b078aa32858bf49064387017831f4e576 /lib/Reaction | |
parent | 1ca3c638ef1fa4f106ef2d301e3f72e31c872c9e (diff) | |
download | reaction-29c740ee77384806aba50779b38132a1a9d31868.tar.gz reaction-29c740ee77384806aba50779b38132a1a9d31868.zip |
argh! missed DEBUG_EVENTS
Diffstat (limited to 'lib/Reaction')
-rw-r--r-- | lib/Reaction/UI/ViewPort/Action.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/Reaction/UI/ViewPort/Action.pm b/lib/Reaction/UI/ViewPort/Action.pm index 1fc3fbf..480ab67 100644 --- a/lib/Reaction/UI/ViewPort/Action.pm +++ b/lib/Reaction/UI/ViewPort/Action.pm @@ -11,6 +11,8 @@ use namespace::clean -except => [ qw(meta) ]; extends 'Reaction::UI::ViewPort::Object::Mutable'; with 'Reaction::UI::ViewPort::Action::Role::OK'; +sub DEBUG_EVENTS () { $ENV{REACTION_UI_VIEWPORT_DEBUG_EVENTS} } + has message => (is => 'rw', isa => Str); has '+model' => (handles => [qw/error_message has_error_message/]); |