Skip to content

Commit 923829d

Browse files
committed
Tidy the import list of Data::Dumper
1 parent 8ed36fa commit 923829d

File tree

4 files changed

+9
-9
lines changed

4 files changed

+9
-9
lines changed

Kernel/Modules/AdminProcessManagement.pm

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -22,7 +22,7 @@ use warnings;
2222
use utf8;
2323

2424
# core modules
25-
use Data::Dumper; ## no critic qw(Modules::ProhibitEvilModules)
25+
use Data::Dumper qw(Dumper); ## no critic qw(Modules::ProhibitEvilModules)
2626

2727
# CPAN modules
2828

Kernel/System/Main.pm

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -24,8 +24,8 @@ use warnings;
2424
use namespace::autoclean; # hide md5_hex, LOCK_SH, LOCK_EX, LOCK_NB, LOCK_UN, irand, IsStringWithData
2525

2626
# core modules
27-
use Digest::MD5 qw(md5_hex);
28-
use Data::Dumper; ## no critic qw(Modules::ProhibitEvilModules)
27+
use Digest::MD5 qw(md5_hex);
28+
use Data::Dumper qw(Dumper); ## no critic qw(Modules::ProhibitEvilModules)
2929
use File::stat;
3030
use List::Util qw(first);
3131
use Fcntl qw(:flock);
@@ -1022,7 +1022,7 @@ sub Dump {
10221022
$Self->_Dump($DataNew);
10231023

10241024
# Dump it as binary strings.
1025-
my $String = Data::Dumper::Dumper( ${$DataNew} );
1025+
my $String = Dumper( ${$DataNew} );
10261026

10271027
# Enable utf8 flag.
10281028
Encode::_utf8_on($String);
@@ -1031,7 +1031,7 @@ sub Dump {
10311031
}
10321032

10331033
# fallback if Storable can not be loaded
1034-
return Data::Dumper::Dumper($Data);
1034+
return Dumper($Data);
10351035
}
10361036

10371037
=head2 DirectoryRead()

Kernel/System/MigrateFromOTRS/Base.pm

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -24,8 +24,8 @@ use namespace::autoclean;
2424
use utf8;
2525

2626
# core modules
27-
use List::Util qw(first);
28-
use Data::Dumper; ## no critic qw(Modules::ProhibitEvilModules)
27+
use List::Util qw(first);
28+
use Data::Dumper qw(Dumper); ## no critic qw(Modules::ProhibitEvilModules)
2929
use File::Basename qw(basename dirname fileparse);
3030
use File::Copy qw(move);
3131
use File::Path qw(make_path);

bin/psgi-bin/otobo.psgi

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -77,8 +77,8 @@ use lib "$Bin/../../Custom";
7777
## nofilter(TidyAll::Plugin::OTOBO::Perl::Time)
7878

7979
# core modules
80-
use Cwd qw(abs_path);
81-
use Data::Dumper; ## no critic qw(Modules::ProhibitEvilModules)
80+
use Cwd qw(abs_path);
81+
use Data::Dumper (); ## no critic qw(Modules::ProhibitEvilModules)
8282
use Encode qw(:all);
8383
use File::Basename qw(dirname);
8484
use File::Path qw(make_path);

0 commit comments

Comments
 (0)