[libcode-tidyall-perl] 286/374: Adjust MasonTidy plugin for new API; Adjust MasonTidy plugin for new API

[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 eff4aab1634eec89ac3ec0d1099d5305107380f7
Author: Jonathan Swartz <swartz at pobox.com>
Date:   Sun Sep 30 04:47:30 2012 -0700

    Adjust MasonTidy plugin for new API; Adjust MasonTidy plugin for new API
---
 lib/Code/TidyAll/Plugin/MasonTidy.pm   |    3 +--
 lib/Code/TidyAll/t/Plugin/MasonTidy.pm |    2 +-
 lib/Code/TidyAll/t/Util.pm             |    2 --
 {t => xt/author}/Util.t                |    0
 4 files changed, 2 insertions(+), 5 deletions(-)

diff --git a/lib/Code/TidyAll/Plugin/MasonTidy.pm b/lib/Code/TidyAll/Plugin/MasonTidy.pm
index e7c4daf..42d21b4 100644
--- a/lib/Code/TidyAll/Plugin/MasonTidy.pm
+++ b/lib/Code/TidyAll/Plugin/MasonTidy.pm
@@ -12,8 +12,7 @@ sub transform_source {
 
     local @ARGV = shellwords( $self->argv );
     local $ENV{MASONTIDY_OPT};
-    my $mt   = Mason::Tidy::App->run($source);
-    my $dest = $mt->tidy($source);
+    my $dest = Mason::Tidy::App->run($source);
     return $dest;
 }
 
diff --git a/lib/Code/TidyAll/t/Plugin/MasonTidy.pm b/lib/Code/TidyAll/t/Plugin/MasonTidy.pm
index df62bf6..2e185c5 100644
--- a/lib/Code/TidyAll/t/Plugin/MasonTidy.pm
+++ b/lib/Code/TidyAll/t/Plugin/MasonTidy.pm
@@ -25,7 +25,7 @@ sub test_main : Tests {
     $self->tidyall(
         source       => $source,
         conf         => { argv => '-m 1 --badoption' },
-        expect_error => qr/Unknown option: badoption/
+        expect_error => qr/Usage/
     );
 }
 
diff --git a/lib/Code/TidyAll/t/Util.pm b/lib/Code/TidyAll/t/Util.pm
index ac3f4b1..f325c18 100644
--- a/lib/Code/TidyAll/t/Util.pm
+++ b/lib/Code/TidyAll/t/Util.pm
@@ -4,8 +4,6 @@ use IPC::System::Simple qw(capturex);
 use Test::Class::Most parent => 'Code::TidyAll::Test::Class';
 
 sub test_tempdir_simple : Tests {
-    return "author testing only" unless ( $ENV{AUTHOR_TESTING} );
-
     my $dir = capturex(
         "$^X", "-I",
         "lib", "-MCode::TidyAll::Util",
diff --git a/t/Util.t b/xt/author/Util.t
similarity index 100%
rename from t/Util.t
rename to xt/author/Util.t

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