[Catalyst-commits] r6840 - in trunk/WWW-Mechanize-TreeBuilder: .
lib lib/WWW/Mechanize t
ash at dev.catalyst.perl.org
ash at dev.catalyst.perl.org
Wed Sep 5 13:38:30 GMT 2007
Author: ash
Date: 2007-09-05 13:38:30 +0100 (Wed, 05 Sep 2007)
New Revision: 6840
Removed:
trunk/WWW-Mechanize-TreeBuilder/lib/Test/
Modified:
trunk/WWW-Mechanize-TreeBuilder/Makefile.PL
trunk/WWW-Mechanize-TreeBuilder/lib/WWW/Mechanize/TreeBuilder.pm
trunk/WWW-Mechanize-TreeBuilder/t/01-basic.t
Log:
Fix test count so stuff passes
Modified: trunk/WWW-Mechanize-TreeBuilder/Makefile.PL
===================================================================
--- trunk/WWW-Mechanize-TreeBuilder/Makefile.PL 2007-09-05 08:50:04 UTC (rev 6839)
+++ trunk/WWW-Mechanize-TreeBuilder/Makefile.PL 2007-09-05 12:38:30 UTC (rev 6840)
@@ -1,7 +1,7 @@
use inc::Module::Install;
-name 'Test-WWW-Mechanize-Catalyst-TreeBuilder';
-all_from 'lib/Test/WWW/Mechanize/Catalyst/TreeBuilder.pm';
+name 'WWW-Mechanize-TreeBuilder';
+all_from 'lib/WWW/Mechanize/TreeBuilder.pm';
requires 'perl' => '5.8.1';
requires 'Moose';
Modified: trunk/WWW-Mechanize-TreeBuilder/lib/WWW/Mechanize/TreeBuilder.pm
===================================================================
--- trunk/WWW-Mechanize-TreeBuilder/lib/WWW/Mechanize/TreeBuilder.pm 2007-09-05 08:50:04 UTC (rev 6839)
+++ trunk/WWW-Mechanize-TreeBuilder/lib/WWW/Mechanize/TreeBuilder.pm 2007-09-05 12:38:30 UTC (rev 6840)
@@ -27,7 +27,7 @@
This module combines WWW::Mechanize and HTML::TreeBuilder. Why? Because I've
seen too much code like the following:
- like($mech->content, qr/<p>some text</p>/, "Found the right tag");
+ like($mech->content, qr{<p>some text</p>}, "Found the right tag");
Which is just all flavours of wrong - its akin to processing XML with regexps.
Instead, do it like the following:
@@ -53,7 +53,7 @@
use Moose::Role;
use HTML::TreeBuilder;
-our $VERSION = 1.00000;
+our $VERSION = 1.00001;
requires '_make_request';
Modified: trunk/WWW-Mechanize-TreeBuilder/t/01-basic.t
===================================================================
--- trunk/WWW-Mechanize-TreeBuilder/t/01-basic.t 2007-09-05 08:50:04 UTC (rev 6839)
+++ trunk/WWW-Mechanize-TreeBuilder/t/01-basic.t 2007-09-05 12:38:30 UTC (rev 6840)
@@ -4,7 +4,7 @@
use FindBin;
use lib "$FindBin::Bin/../t/lib";
-use Test::More tests => 9;
+use Test::More tests => 10;
BEGIN {
use_ok 'WWW::Mechanize::TreeBuilder';
More information about the Catalyst-commits
mailing list