X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/e0a3b19e35aed6f3f8ba84e25381a5d0e6ca61f4..36c8af5266db4c2894cd37df798212c2e7f06f68:/SL/Layout/ActionBar/Action.pm diff --git a/SL/Layout/ActionBar/Action.pm b/SL/Layout/ActionBar/Action.pm index 454255c8c..b72314b4a 100644 --- a/SL/Layout/ActionBar/Action.pm +++ b/SL/Layout/ActionBar/Action.pm @@ -4,9 +4,10 @@ use strict; use parent qw(Rose::Object); use SL::Presenter; + require SL::Layout::ActionBar::Submit; use Rose::Object::MakeMethods::Generic ( - 'scalar --get_set_init' => [ qw(id) ], + 'scalar --get_set_init' => [ qw(id params text) ], ); # subclassing interface @@ -16,39 +17,17 @@ sub render { } sub script { - die 'needs to be implemented'; -} - - -# static constructors - -sub from_descriptor { - my ($class, $descriptor) = @_;a - - { - separator => SL::Layout::ActionBar::Separator->new, - } or die 'unknown descriptor'; + sprintf q|$('#%s').data('action', %s);|, $_[0]->id, JSON->new->allow_blessed->convert_blessed->encode($_[0]->params); } -# TODO: this necessary? -sub simple { +# this is mostly so that outside consumer don't need to load subclasses themselves +sub from_params { my ($class, $data) = @_; my ($text, %params) = @$data; - - if ($params{submit}) { - require SL::Layout::ActionBar::Submit; - return SL::Layout::ActionBar::Submit->new(text => $text, %params); - } - - if ($params{function}) { - require SL::Layout::ActionBar::ScriptButton; - return SL::Layout::ActionBar::ScriptButton->new(text => $text, %params); - } - - if ($params{combobox}) { - - } + 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); } # shortcut for presenter @@ -57,8 +36,13 @@ sub p { SL::Presenter->get } +sub init_params { + +{} +} + # unique id to tie div and javascript together sub init_id { + $_[0]->params->{id} // $_[0]->p->name_to_id('action[]') } @@ -66,3 +50,25 @@ sub init_id { 1; __END__ + +=head 1 + +planned options for clickables: + +- checks => [ ... ] (done) + +a list of functions that need to return true before submitting + +- submit => [ form-selector, { params } ] (done) + +on click submit the form specified by form-selector with the additional params + +- function => function-name (done) + +on click call the specified function (is this a special case of checks?) + +- disabled => true/false/tooltip explaning why disabled (done) + +TODO: + +- runtime disable/enable