X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/e0a3b19e35aed6f3f8ba84e25381a5d0e6ca61f4..1ba38eaf5f960ed5ba531b47c27a38bee5be44b4:/SL/Layout/ActionBar/Action.pm

diff --git a/SL/Layout/ActionBar/Action.pm b/SL/Layout/ActionBar/Action.pm
index 454255c8c..e73387769 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,28 @@ sub render {
 }
 
 sub script {
-  die 'needs to be implemented';
+  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) = @_;a
+  my ($class, $descriptor) = @_;
+  require SL::Layout::ActionBar::Separator;
+  require SL::Layout::ActionBar::ComboBox;
 
-  {
+  return {
      separator => SL::Layout::ActionBar::Separator->new,
-  } or die 'unknown descriptor';
+     combobox  => SL::Layout::ActionBar::ComboBox->new,
+  }->{$descriptor} || do { die 'unknown descriptor' };
 }
 
-# TODO: this necessary?
+# this is mostly so that outside consumer don't need to load subclasses themselves
 sub simple {
   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 SL::Layout::ActionBar::Submit->new(text => $text, params => \%params);
 }
 
 # shortcut for presenter
@@ -66,3 +56,26 @@ 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 (done)
+
+TODO:
+
+- runtime disable/enable
+