Browse files

Plugin::Encoding::MobileJPで必要なModuleがなければPluginのテストをskip

  • Loading branch information...
1 parent 96c4f43 commit 190d8a43256e8becef642a698d465c98975fd6b2 @shin1rosei shin1rosei committed Nov 8, 2011
Showing with 12 additions and 2 deletions.
  1. +6 −1 t/plugin_encoding_mobilejp.t
  2. +6 −1 t/plugin_encoding_mobilejp_called_parameters_before.t
View
7 t/plugin_encoding_mobilejp.t
@@ -4,6 +4,12 @@ use HTTP::Request::Common;
use Test::More;
use utf8;
+eval "use Encode::JP::Mobile";
+plan skip_all => 'this test required Encode::JP::Mobile' if $@;
+
+eval "use HTTP::MobileAgent::Plugin::Charset";
+plan skip_all => 'this test required HTTP::MobileAgent::Plugin::Charset' if $@;
+
{
package T;
use Ark;
@@ -16,7 +22,6 @@ use utf8;
package T::Encoding::Test;
use Ark::Plugin;
- use Ark::Plugin::Encoding::MobileJP;
sub prepare_encoding {
my ($c) = @_;
View
7 t/plugin_encoding_mobilejp_called_parameters_before.t
@@ -6,6 +6,12 @@ use Encode;
use utf8;
+eval "use Encode::JP::Mobile";
+plan skip_all => 'this test required Encode::JP::Mobile' if $@;
+
+eval "use HTTP::MobileAgent::Plugin::Charset";
+plan skip_all => 'this test required HTTP::MobileAgent::Plugin::Charset' if $@;
+
{
package T;
use Ark;
@@ -18,7 +24,6 @@ use utf8;
package T::Encoding::Test;
use Ark::Plugin;
- use Ark::Plugin::Encoding::MobileJP;
sub prepare_encoding {
my ($c) = @_;

0 comments on commit 190d8a4

Please sign in to comment.