use SL::AR;
use SL::AP;
use Data::Dumper;
+use SL::Locale::String qw(t8);
use strict;
#use warnings;
# $locale->text('AR')
# $locale->text('AP')
+ setup_cp_form_action_bar(can_post => !!$form->{rowcount});
+
$form->header;
$arap = lc $form->{ARAP};
$lxdebug->leave_sub();
}
+
+sub setup_cp_form_action_bar {
+ my (%params) = @_;
+
+ for my $bar ($::request->layout->get('actionbar')) {
+ $bar->add(
+ action => [
+ t8('Update'),
+ submit => [ '#form', { action => "update" } ],
+ accesskey => 'enter',
+ ],
+ action => [
+ t8('Post'),
+ submit => [ '#form', { action => "post" } ],
+ ],
+ );
+ }
+}
</tr>
</table>
<input type=hidden name=rowcount value="[% rowcount | html %]">
-
-<br>
-<input class=submit type=submit name=action value="[% 'Update' | $T8 %]">
-<input class=submit type=submit name=action value="[% 'Post' | $T8 %]">
</form>
-
[%- USE HTML %]
[%- USE T8 %]
[%- USE LxERP %][%- USE P -%]
-<form method=post action=cp.pl>
+<form method="post" action="cp.pl" id="form">
[% SET vc_id = vc _ '_id'
style = "width: 250px" %]