[openid-test commit] r52 - trunk/perl

[codesite...@google.com]

Author: ma...@degeneration.co.uk
Date: Fri May 16 16:13:21 2008
New Revision: 52

Modified:
trunk/perl/perl-test.cgi

Log:
Backing out accidentally checked in change from LWPx::ParanoidAgent to LWP::UserAgent.

Modified: trunk/perl/perl-test.cgi
==============================================================================
--- trunk/perl/perl-test.cgi (original)
+++ trunk/perl/perl-test.cgi Fri May 16 16:13:21 2008
@@ -214,7 +214,7 @@
my $base = $self->base;
my $csr = Net::OpenID::Consumer->new
(
- ua => LWP::UserAgent->new,
+ ua => LWPx::ParanoidAgent->new,
cache => $self->{rpcache},
args => $cgi,
consumer_secret => $self->consumer_secret,
@@ -323,7 +323,7 @@
my $base = $self->base;
my $csr = Net::OpenID::Consumer->new
(
- ua => LWP::UserAgent->new,
+ ua => LWPx::ParanoidAgent->new,
cache => $cache,
args => $cgi,
consumer_secret => $self->consumer_secret,