use strict;
use warnings;
use Test::More;
-use IO::Scalar;
# setup library path
use FindBin qw($Bin);
use lib "$Bin/lib";
BEGIN {
-if ( !eval { require Test::WWW::Mechanize::Catalyst } || ! Test::WWW::Mechanize::Catalyst->VERSION('0.51') ) {
+ if ( !eval { require Test::WWW::Mechanize::Catalyst; Test::WWW::Mechanize::Catalyst->VERSION('0.51') } ) {
plan skip_all => 'Need Test::WWW::Mechanize::Catalyst for this test';
-}
+ }
}
# make sure testapp works
use_ok('TestAppUnicode') or BAIL_OUT($@);
-our $TEST_FILE = IO::Scalar->new(\"this is a test");
-sub IO::Scalar::FILENO { -1 }; # needed?
-
# a live test against TestAppUnicode, the test application
use Test::WWW::Mechanize::Catalyst 'TestAppUnicode';
my $mech = Test::WWW::Mechanize::Catalyst->new;