[libcode-tidyall-perl] 115/374: switch to find_conffile

[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 56921607e85ce2967a48add0ea73ea911aedf940
Author: Jonathan Swartz <swartz at pobox.com>
Date:   Tue Jul 24 14:01:42 2012 -0700

    switch to find_conffile
---
 bin/tidyall |    8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/bin/tidyall b/bin/tidyall
index db3376e..495f2ed 100755
--- a/bin/tidyall
+++ b/bin/tidyall
@@ -46,14 +46,14 @@ $params{conf_file} ||= "$params{root_dir}/tidyall.ini" if ( $params{root_dir} );
 
 my @results;
 if ($all) {
-    $params{conf_file} ||= Code::TidyAll->find_conf_file( cwd() );
-    my $ct = Code::TidyAll->new(%params);
+    my $conf_file ||= Code::TidyAll->find_conf_file( cwd() );
+    my $ct = Code::TidyAll->new_from_conf_file( $conf_file, %params );
     @results = $ct->process_all();
 }
 else {
     my @files = @ARGV or die "file(s) or -a required";
-    $params{conf_file} ||= Code::TidyAll->find_conf_file( dirname( $files[0] ) );
-    my $ct = Code::TidyAll->new(%params);
+    my $conf_file ||= Code::TidyAll->find_conf_file( dirname( $files[0] ) );
+    my $ct = Code::TidyAll->new_from_conf_file( $conf_file, %params );
     @results = $ct->process_files(@files);
 }
 

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