X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/6f1da6d45bd0b3142876e2bb46acba757ad4e716..ff424b75f8f66c796eae294d0239f0440741e578:/SL/Layout/ActionBar/Action.pm diff --git a/SL/Layout/ActionBar/Action.pm b/SL/Layout/ActionBar/Action.pm index 5d03b7c05..bed33fe1c 100644 --- a/SL/Layout/ActionBar/Action.pm +++ b/SL/Layout/ActionBar/Action.pm @@ -20,21 +20,8 @@ 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; @@ -83,4 +70,3 @@ on click call the specified function (is this a special case of checks?) TODO: - runtime disable/enable -