SL/Layout/ActionBar/Link.pm

   1 package SL::Layout::ActionBar::Link;
   2
   3 use strict;
   4 use parent qw(SL::Layout::ActionBar::Action);
   5
   6 use SL::Presenter::Tag qw(html_tag);
   7
   8 sub from_params {
   9   my ($class, $data) = @_;
  10
  11   my ($text, %params) = @$data;
  12
  13   return if exists($params{only_if}) && !$params{only_if};
  14   return if exists($params{not_if})  &&  $params{not_if};
  15   return SL::Layout::ActionBar::Link->new(text => $text, params => \%params);
  16 }
  17
  18 sub render {
  19   my ($self) = @_;
  20
  21   html_tag(
  22     'div', $self->text,
  23     id    => $self->id,
  24     class => 'layout-actionbar-action layout-actionbar-link',
  25   );
  26 }
  27
  28 sub callable { 1 }
  29
  30 1;