X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/dd1ab30b7c2a6bec318dd75100e54c9bfa400e77..36c8af5266db4c2894cd37df798212c2e7f06f68:/SL/Layout/ActionBar/Action.pm?ds=inline

diff --git a/SL/Layout/ActionBar/Action.pm b/SL/Layout/ActionBar/Action.pm
index 8b83295c5..b72314b4a 100644
--- a/SL/Layout/ActionBar/Action.pm
+++ b/SL/Layout/ActionBar/Action.pm
@@ -4,6 +4,7 @@ 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 params text) ],
@@ -19,39 +20,14 @@ 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} or die 'unknown descriptor';
-}
-
-# 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 => \%params);
-  }
-
-  if ($params{function}) {
-    require SL::Layout::ActionBar::ScriptButton;
-    return SL::Layout::ActionBar::ScriptButton->new(text => $text, params => \%params);
-  }
-
-  if ($params{actions}) {
-    require SL::Layout::ActionBar::ComboBox;
-    return SL::Layout::ActionBar::ComboBox->new(text => $text, %params);
-  }
+  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
@@ -60,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[]')
 }
 
@@ -86,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
-