Skip to content

Commit

Permalink
Issue #761: remove a workaround that looked obsolete
Browse files Browse the repository at this point in the history
Script still worked after tidying.
  • Loading branch information
bschmalhofer committed Feb 28, 2021
1 parent dc61ee6 commit bd9935d
Showing 1 changed file with 0 additions and 11 deletions.
11 changes: 0 additions & 11 deletions scripts/test/Console/Command/Maint/SupportBundle/Generate.t
Original file line number Diff line number Diff line change
Expand Up @@ -34,17 +34,6 @@ local $Kernel::OM = Kernel::System::ObjectManager->new(
}
);

# Work around a Perl bug that is triggered in Carp
# (Bizarre copy of HASH in list assignment at /usr/share/perl5/vendor_perl/Carp.pm line 229).
#
#   See https://rt.perl.org/Public/Bug/Display.html?id=52610 and
#   http://rt.perl.org/rt3/Public/Bug/Display.html?id=78186

no warnings 'redefine'; ## no critic qw(TestingAndDebugging::ProhibitNoWarnings)
use Carp;
local *Carp::caller_info = sub { };
use warnings 'redefine';

plan(2);

my $TargetDirectory = $Kernel::OM->Get('Kernel::Config')->Get('Home') . '/var/tmp';
Expand Down

0 comments on commit bd9935d

Please sign in to comment.