Skip Menu |

This queue is for tickets about the libwww-perl CPAN distribution.

Report information
The Basics
Id: 35456
Status: resolved
Priority: 0/
Queue: libwww-perl

People
Owner: Nobody in particular
Requestors: ville.skytta [...] iki.fi
Cc:
AdminCc:

Bug Information
Severity: Normal
Broken in: 5.812
Fixed in: (no value)



Subject: [PATCH] RobotUA constructor ignores delay, use_sleep
LWP::RobotUA->new ignores the passed delay and use_sleep parameters, fix against current git attached.
Subject: 0001-Use-delay-use_sleep-passed-in-constructor.patch
From a16e56e7d62a233db100fe5529aeda359be0c3ef Mon Sep 17 00:00:00 2001 From: =?utf-8?q?Ville=20Skytt=C3=A4?= <ville.skytta@iki.fi> Date: Sun, 27 Apr 2008 00:14:46 +0300 Subject: [PATCH] Use delay, use_sleep passed in constructor. --- lib/LWP/RobotUA.pm | 4 ++-- 1 files changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/LWP/RobotUA.pm b/lib/LWP/RobotUA.pm index 2732be1..705d227 100644 --- a/lib/LWP/RobotUA.pm +++ b/lib/LWP/RobotUA.pm @@ -48,8 +48,8 @@ sub new my $self = LWP::UserAgent->new(%cnf); $self = bless $self, $class; - $self->{'delay'} = 1; # minutes - $self->{'use_sleep'} = 1; + $self->{'delay'} = $delay; # minutes + $self->{'use_sleep'} = $use_sleep; if ($rules) { $rules->agent($cnf{agent}); -- 1.5.4.3
Applied. Thanks!