X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/7fb610a59d0fe90d59796a98cd65846b646341e2..4f6a2fa1d46212e189bc46a04fce62a77120e02f:/bin/mozilla/amcvar.pl diff --git a/bin/mozilla/amcvar.pl b/bin/mozilla/amcvar.pl index fc4f26f14..25e3ec738 100644 --- a/bin/mozilla/amcvar.pl +++ b/bin/mozilla/amcvar.pl @@ -54,11 +54,13 @@ our %translations = ('text' => $locale->text('Free-form text'), 'timestamp' => $locale->text('Timestamp'), 'bool' => $locale->text('Yes/No (Checkbox)'), 'select' => $locale->text('Selection'), + 'customer' => $locale->text('Customer'), ); -our @types = qw(text textfield number date bool select); # timestamp +our @types = qw(text textfield number date bool select customer); # timestamp our @modules = ({ module => 'CT', description => $locale->text('Customers and vendors') }, + { module => 'Contacts', description => $locale->text('Contact persons') }, { module => 'IC', description => $locale->text('Parts, services and assemblies') }, { module => 'Projects', description => $locale->text('Projects') }, ); @@ -210,11 +212,27 @@ sub display_cvar_config_form { $main::lxdebug->leave_sub(); } +sub update { + $main::lxdebug->enter_sub(); + + my $form = $main::form; + + $main::auth->assert('config'); + + $form->{included_by_default} = $form->{inclusion} eq 'yes_default_on'; + $form->{includeable} = $form->{inclusion} ne 'no'; + + display_cvar_config_form(); + + $main::lxdebug->leave_sub(); +} + + sub dispatcher { my $form = $main::form; my $locale = $main::locale; - foreach my $action (qw(list_cvar_configs add_cvar_config)) { + foreach my $action (qw(list_cvar_configs add_cvar_config update)) { if ($form->{"action_${action}"}) { call_sub($action); return; @@ -225,3 +243,4 @@ sub dispatcher { } 1; +