X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/9c0b55ba6c7bee8e349920abffc3048ba480cf26..fdebfd5d0c558cb156849b01c9c9268b29dc443b:/bin/mozilla/dn.pl diff --git a/bin/mozilla/dn.pl b/bin/mozilla/dn.pl index c20227978..c16f6c34c 100644 --- a/bin/mozilla/dn.pl +++ b/bin/mozilla/dn.pl @@ -84,6 +84,8 @@ sub edit_config { $form->{title} = $locale->text('Edit Dunning Process Config'); $form->{callback} ||= build_std_url("action=edit_config"); + setup_dn_edit_config_action_bar(); + $form->header(); print $form->parse_html_template("dunning/edit_config"); @@ -453,7 +455,7 @@ sub show_dunning { $report->set_options_from_form(); setup_dn_show_dunning_action_bar(); - $report->generate_with_headers(action_bar => 1); + $report->generate_with_headers(); $main::lxdebug->leave_sub(); @@ -629,4 +631,18 @@ sub setup_dn_show_dunning_action_bar { } } +sub setup_dn_edit_config_action_bar { + my %params = @_; + + for my $bar ($::request->layout->get('actionbar')) { + $bar->add( + action => [ + t8('Save'), + submit => [ '#form', { action => "save" } ], + accesskey => 'enter', + ], + ); + } +} + # end of main