Skip to content

Commit

Permalink
adding -T to shebang
Browse files Browse the repository at this point in the history
  • Loading branch information
petdance committed Jul 5, 2011
1 parent e18adb5 commit c32d3ad
Show file tree
Hide file tree
Showing 16 changed files with 20 additions and 19 deletions.
3 changes: 2 additions & 1 deletion Changes
Original file line number Diff line number Diff line change
Expand Up @@ -18,7 +18,8 @@ WWW::Mechanize, because it has use outside of the Test:: world.
$mech->followable_links() now finds file: URLs, too.

[INTERNALS]
Most tests no longer use TestServer.pm class.
Most tests no longer use TestServer.pm class. All tests now run under
-T and have plan counts.


1.32 Wed May 11 10:12:25 CDT 2011
Expand Down
2 changes: 1 addition & 1 deletion t/00load.t
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
#!perl
#!perl -Tw

use warnings;
use strict;
Expand Down
2 changes: 1 addition & 1 deletion t/back_ok.t
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
#!perl
#!perl -Tw

use strict;
use warnings;
Expand Down
4 changes: 2 additions & 2 deletions t/click_ok.t
Original file line number Diff line number Diff line change
Expand Up @@ -2,7 +2,7 @@

use strict;
use warnings;
use Test::More 'no_plan';
use Test::More tests => 4;
use Test::Builder::Tester;

use lib 't';
Expand All @@ -21,7 +21,7 @@ SUBMIT_GOOD_FORM: {
my $mech = Test::WWW::Mechanize->new();
isa_ok( $mech,'Test::WWW::Mechanize' );

$mech->get( "$server_root/form.html" );
$mech->get_ok( "$server_root/form.html" );
$mech->click_ok( 'big_button', 'Submit First Form' );
}

Expand Down
2 changes: 1 addition & 1 deletion t/content_contains.t
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
#!perl -w
#!perl -Tw

use strict;
use warnings;
Expand Down
2 changes: 1 addition & 1 deletion t/get_ok-parms.t
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
#!perl
#!perl -Tw

use strict;
use warnings;
Expand Down
2 changes: 1 addition & 1 deletion t/head_ok-parms.t
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
#!perl
#!perl -Tw

use strict;
use warnings;
Expand Down
2 changes: 1 addition & 1 deletion t/head_ok.t
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
#!perl
#!perl -Tw

use strict;
use warnings;
Expand Down
2 changes: 1 addition & 1 deletion t/html_lint_ok.t
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
#!perl
#!perl -Tw

use strict;
use warnings;
Expand Down
2 changes: 1 addition & 1 deletion t/lacks_uncapped_inputs.t
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
#!perl -w
#!perl -Tw

use strict;
use warnings;
Expand Down
2 changes: 1 addition & 1 deletion t/link_status.t
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
#!perl
#!perl -Tw

use strict;
use warnings;
Expand Down
2 changes: 1 addition & 1 deletion t/new.t
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
#!perl
#!perl -Tw

use warnings;
use strict;
Expand Down
2 changes: 1 addition & 1 deletion t/pod-coverage.t
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
#!perl
#!perl -Tw

use strict;
use warnings;
Expand Down
2 changes: 1 addition & 1 deletion t/pod.t
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
#!perl
#!perl -Tw

use strict;
use warnings;
Expand Down
2 changes: 1 addition & 1 deletion t/put_ok.t
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
#!perl
#!perl -Tw

use strict;
use warnings;
Expand Down
6 changes: 3 additions & 3 deletions t/submit_form_ok.t
Original file line number Diff line number Diff line change
@@ -1,8 +1,8 @@
#!perl
#!perl -Tw

use strict;
use warnings;
use Test::More 'no_plan';
use Test::More tests => 4;
use Test::Builder::Tester;

BEGIN {
Expand All @@ -20,7 +20,7 @@ SUBMIT_GOOD_FORM: {
my $mech = Test::WWW::Mechanize->new();
isa_ok( $mech,'Test::WWW::Mechanize' );

$mech->get( "$server_root/form.html" );
$mech->get_ok( "$server_root/form.html" );
$mech->submit_form_ok( {form_number =>1}, 'Submit First Form' );
}

Expand Down

0 comments on commit c32d3ad

Please sign in to comment.