From: Sven Schöling Date: Tue, 13 Feb 2018 12:44:39 +0000 (+0100) Subject: Form: verwaiste Funktionen entfernt X-Git-Tag: release-3.5.4~467 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=678992ffad65c5d10c52552792edee0a2a708bfd;p=kivitendo-erp.git Form: verwaiste Funktionen entfernt --- diff --git a/SL/Form.pm b/SL/Form.pm index 43a3a39cb..b9835881d 100644 --- a/SL/Form.pm +++ b/SL/Form.pm @@ -194,36 +194,6 @@ sub flatten_standard_variables { return @variables; } -sub debug { - $main::lxdebug->enter_sub(); - - my ($self) = @_; - - print "\n"; - - map { print "$_ = $self->{$_}\n" } (sort keys %{$self}); - - $main::lxdebug->leave_sub(); -} - -sub dumper { - $main::lxdebug->enter_sub(2); - - my $self = shift; - my $password = $self->{password}; - - $self->{password} = 'X' x 8; - - local $Data::Dumper::Sortkeys = 1; - my $output = Dumper($self); - - $self->{password} = $password; - - $main::lxdebug->leave_sub(2); - - return $output; -} - sub escape { my ($self, $str) = @_; @@ -3615,29 +3585,6 @@ sub create_email_signature { }; -sub layout { - my ($self) = @_; - $::lxdebug->enter_sub; - - my %style_to_script_map = ( - v3 => 'v3', - neu => 'new', - ); - - my $menu_script = $style_to_script_map{$::myconfig{menustyle}} || ''; - - package main; - require "bin/mozilla/menu$menu_script.pl"; - package Form; - require SL::Controller::FrameHeader; - - - my $layout = SL::Controller::FrameHeader->new->action_header . ::render(); - - $::lxdebug->leave_sub; - return $layout; -} - sub calculate_tax { # this function calculates the net amount and tax for the lines in ar, ap and # gl and is used for update as well as post. When used with update the return