Author: sparky
Date: Wed Oct 21 21:29:03 2009
New Revision: 10797
Modified:
toys/rsget.pl/RSGet/HTTPRequest.pm
Log:
- updated for changes in Captcha.pm
Modified: toys/rsget.pl/RSGet/HTTPRequest.pm
==============================================================================
--- toys/rsget.pl/RSGet/HTTPRequest.pm (original)
+++ toys/rsget.pl/RSGet/HTTPRequest.pm Wed Oct 21 21:29:03 2009
@@ -180,6 +180,7 @@
multi => "red",
problem => "red",
wait => "blue",
+ delay => "bluegreen",
);
my $color = $o->{wait} ? $wait_to_color{ $o->{wait} } : "green";
@@ -679,7 +680,8 @@
$headers->{Content_Type} = "text/plain";
return $post->{solve};
} elsif ( my $n = $RSGet::Captcha::needed{ $md5 } ) {
- ( $ct, $data ) = @$n;
+ ( $ct, my $dataref ) = @$n;
+ $data = $$dataref;
} else {
$ct = "image/png";
local $/ = undef;
_______________________________________________
pld-cvs-commit mailing list
[email protected]
http://lists.pld-linux.org/mailman/listinfo/pld-cvs-commit
