[Catalyst] Test::WWW::Mechanize::Catalyst - HTTP::Cookies

[Sébastien Wagener]

Hi,

I get the following error while testing an action that creates a cookie
(CATALYST_SERVER not set):
Can't locate object method "host" via package "URI::_generic"
at /usr/local/share/perl/5.8.7/HTTP/Cookies.pm line 566.

Here is my test code:

use Test::More tests => 2;
BEGIN { use_ok( 'Test::WWW::Mechanize::Catalyst', 'ct' ); }
my $m = Test::WWW::Mechanize::Catalyst->new;
$m->get_ok("/security/captcha");

I can help myself by adding the following lines to my test script, but I
fear I am getting problems if I set CATALYST_SERVER?

package URI::_generic;

sub host {
    return "";
}

sub port {
    return 0;
}

What do you think of it?

Sébastien