sub _DieWithError { my ( $Self, %Parameter ) = @_; if ( $Self -> { Objects } -> { 'Kernel::System::Log' } ) { $Self -> { Objects } -> { 'Kernel::System::Log' } -> Log( Priority => 'Error' , Message => $Parameter{ Error } ); } # Carp::croak $Parameter{ Error }; }