view release on metacpan or  search on metacpan

Changes  view on Meta::CPAN

	- catch exceptions in creating timezone object
	* t/10.client.t
	- skip tests unless $ATOMPUB_TEST_LIVE is not defined

2007-11-17  Takeru INOUE  <takeru.inoue _ gmail.com>

	* release 0.2.3:
	* Atompub.pm
	- use 5.006
	* 10.client.t
	- use HTTP proxy if $HTTP_PROXY/$http_proxy is defined

2007-10-07  Takeru INOUE  <takeru.inoue _ gmail.com>

	* release 0.2.2:
	* Build.PL
	- add Module::Build::Compat to requires

2007-10-06  Takeru INOUE  <takeru.inoue _ gmail.com>

	* release 0.2.1:

t/10.client.t  view on Meta::CPAN

my $USER = 'foo';
my $PASS = 'foo';


my $client = Atompub::Client->new;
isa_ok $client, 'Atompub::Client';

$client->username($USER);
$client->password($PASS);

if (my $proxy = $ENV{HTTP_PROXY} || $ENV{http_proxy}) {
    diag "using HTTP proxy: $proxy";
    $client->proxy( $proxy ) if $proxy;
}

# Service

ok !$client->getService('http://example.com/service'); # Not Found

like $client->errstr, qr/not found/i;