Reaction::UI::ViewPort::Action::Role::Close - Integrate Close and Apply events into ViewPort
package MyApp::UI::ViewPort::SomeAction; use Reaction::Class; use namespace::clean -except => 'meta'; extends 'Reaction::UI::ViewPort::Object::Mutable'; with 'Reaction::UI::ViewPort::Action::Role::Close'; ... 1;
This role integrates a close event and inherits an apply event into the consuming viewport.
close
Defaults to returned string value of "_build_close_label" (close).
Defaults to returned string value of "_build_close_label_close" (close).
This label is only shown when changed is true. It is initialised with the returned string value of "_build_close_label_cancel".
changed
Default: 'cancel'
CodeRef. If set will be called on "close".
Calls "on_close_callback" if one is set.
Returns true.
Extends "apply" in Reaction::UI::ViewPort::Action::Role::Apply and sets the "close_label" to "close_label_cancel" if the original call to apply was not successfull.
apply
Returns the result of the original apply call.
Extends "accept_events" in Reaction::UI::ViewPort::Action::Role::Apply with the close event if an "on_close_callback" was provided.
Reaction::UI::ViewPort::Action::Role::Apply
Reaction::UI::ViewPort::Action::Role::OK
See Reaction::Class for authors.
See Reaction::Class for the license.
To install Reaction, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Reaction
CPAN shell
perl -MCPAN -e shell install Reaction
For more information on module installation, please visit the detailed CPAN module installation guide.