[libcode-tidyall-perl] 217/374: elim use of Hash::MoreUtils from bin/tidyall

[Jonas Smedegaard]

This is an automated email from the git hooks/post-receive script.

js pushed a commit to branch master
in repository libcode-tidyall-perl.

commit d55725158111bf8dd7e3536279604dbfff5b5c52
Author: Jonathan Swartz <swartz at pobox.com>
Date:   Tue Sep 11 00:28:57 2012 -0400

    elim use of Hash::MoreUtils from bin/tidyall
---
 bin/tidyall |    3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/bin/tidyall b/bin/tidyall
index ec7db3e..ac550a5 100755
--- a/bin/tidyall
+++ b/bin/tidyall
@@ -4,7 +4,6 @@ use Getopt::Long;
 use Pod::Usage;
 use Code::TidyAll;
 use Code::TidyAll::Util qw(can_load dirname);
-use Hash::MoreUtils qw(slice_def);
 use strict;
 use warnings;
 
@@ -43,7 +42,7 @@ Pod::Usage::pod2usage( { verbose => 2 } ) if $help;
 
 unshift( @INC, split( /\s*,\s*/, $inc_dirs ) ) if defined($inc_dirs);
 
-%params = slice_def( \%params );
+%params = map { ( $_, $params{$_} ) } grep { defined( $params{$_} ) } keys(%params);
 
 $conf_file = "$params{root_dir}/tidyall.ini"
   if $params{root_dir} && !$conf_file && -f "$params{root_dir}/tidyall.ini";

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libcode-tidyall-perl.git