X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Famcvar.pl;h=fc4f26f14f941e9043e067596a93b3ccb79dbbff;hb=f742983addf80ee40aecd76b6602faa452ece91e;hp=3be956a727444ed71d454faf1ca7ad482472c4cc;hpb=5536f72295081df4c6b227855cfa22745fcc6039;p=kivitendo-erp.git diff --git a/bin/mozilla/amcvar.pl b/bin/mozilla/amcvar.pl index 3be956a72..fc4f26f14 100644 --- a/bin/mozilla/amcvar.pl +++ b/bin/mozilla/amcvar.pl @@ -90,17 +90,8 @@ sub list_cvar_configs { my @configs = @{ CVar->get_configs(module => $form->{module}) }; - my $previous_config; - foreach my $config (@configs) { $config->{type_tr} = $translations{$config->{type}}; - - if ($previous_config) { - $previous_config->{next_id} = $config->{id}; - $config->{previous_id} = $previous_config->{id}; - } - - $previous_config = $config; } $form->{title} = $locale->text('List of custom variables'); @@ -219,19 +210,6 @@ sub display_cvar_config_form { $main::lxdebug->leave_sub(); } -sub swap_cvar_configs { - $main::lxdebug->enter_sub(); - - my $form = $main::form; - my %myconfig = %main::myconfig; - - AM->swap_sortkeys(\%myconfig, $form, 'custom_variable_configs'); - - list_cvar_configs(); - - $main::lxdebug->leave_sub(); -} - sub dispatcher { my $form = $main::form; my $locale = $main::locale;