X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/2cac4306081513c991f7a84ed7c72c7d852ff019..36c8af5266db4c2894cd37df798212c2e7f06f68:/SL/Layout/ActionBar/Action.pm diff --git a/SL/Layout/ActionBar/Action.pm b/SL/Layout/ActionBar/Action.pm index 1ee9a3e95..b72314b4a 100644 --- a/SL/Layout/ActionBar/Action.pm +++ b/SL/Layout/ActionBar/Action.pm @@ -20,24 +20,13 @@ sub script { sprintf q|$('#%s').data('action', %s);|, $_[0]->id, JSON->new->allow_blessed->convert_blessed->encode($_[0]->params); } -# static constructors - -sub from_descriptor { - my ($class, $descriptor) = @_; - require SL::Layout::ActionBar::Separator; - require SL::Layout::ActionBar::ComboBox; - - return { - separator => SL::Layout::ActionBar::Separator->new, - combobox => SL::Layout::ActionBar::ComboBox->new, - }->{$descriptor} || do { die 'unknown descriptor' }; -} - # this is mostly so that outside consumer don't need to load subclasses themselves -sub simple { +sub from_params { my ($class, $data) = @_; my ($text, %params) = @$data; + return if exists($params{only_if}) && !$params{only_if}; + return if exists($params{not_if}) && $params{not_if}; return SL::Layout::ActionBar::Submit->new(text => $text, params => \%params); } @@ -78,9 +67,8 @@ on click submit the form specified by form-selector with the additional params on click call the specified function (is this a special case of checks?) -- disabled => true/false (done) +- disabled => true/false/tooltip explaning why disabled (done) TODO: - runtime disable/enable -