The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Reaction::UI::ViewPort::Action::Role::OK - Integrate OK, Apply and Close events

SYNOPSIS

  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::OK';

  ...
  1;

DESCRIPTION

This role integrates an ok event and inherits a close and an apply event into the consuming viewport.

ATTRIBUTES

ok_label

Defaults to ok. String is built by "_build_ok_label".

METHODS

ok

Calls apply, and then close if successful.

accept_events

Extends "accept_events" in Reaction::UI::ViewPort::Action::Role::Close with the event ok if an on_close_callback was provided.

INTERNAL METHODS

_build_ok_label

Returns the string representing the label for the OK action. Defaults to ok.

SEE ALSO

Reaction::UI::ViewPort::Action::Role::Apply

Reaction::UI::ViewPort::Action::Role::Close

AUTHORS

See Reaction::Class for authors.

LICENSE

See Reaction::Class for the license.