X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FLayout%2FActionBar%2FSubmit.pm;h=f3288c7d9f00859a5ebdb809cfe4f0b594d080d1;hb=9b16f8f89f00a7429f85144527a97d1168ea0000;hp=a277e3be2dc4fa75b5980c7ec1bad232a947f7bd;hpb=3dc29e42a53f674d4a5b745663b1f85b54131de2;p=kivitendo-erp.git

diff --git a/SL/Layout/ActionBar/Submit.pm b/SL/Layout/ActionBar/Submit.pm
index a277e3be2..f3288c7d9 100644
--- a/SL/Layout/ActionBar/Submit.pm
+++ b/SL/Layout/ActionBar/Submit.pm
@@ -3,11 +3,18 @@ package SL::Layout::ActionBar::Submit;
 use strict;
 use parent qw(SL::Layout::ActionBar::Action);
 
+use SL::Presenter::Tag qw(html_tag);
+
 sub render {
-  $_[0]->p->html_tag('div', $_[0]->text,
+  html_tag('div', $_[0]->text,
     id    => $_[0]->id,
     class => 'layout-actionbar-action layout-actionbar-submit',
   );
 }
 
+sub callable {
+  my ($self) = @_;
+  return $self->params->{submit} || $self->params->{call} || $self->params->{link};
+}
+
 1;