SL/Layout/ActionBar/Submit.pm

   1 package SL::Layout::ActionBar::Submit;
   2
   3 use strict;
   4 use parent qw(SL::Layout::ActionBar::Action);
   5
   6 use SL::Presenter::Tag qw(html_tag);
   7
   8 sub render {
   9   html_tag('div', $_[0]->text,
  10     id    => $_[0]->id,
  11     class => 'layout-actionbar-action layout-actionbar-submit',
  12   );
  13 }
  14
  15 sub callable {
  16   my ($self) = @_;
  17   return $self->params->{submit} || $self->params->{call} || $self->params->{link};
  18 }
  19
  20 1;