Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Make PoCo-Resolver work on Perl 5.8. Resolves rt.cpan.org #65179.

  • Loading branch information...
commit 11b45c5ee3d17a3b7f7982c0ff642f99729bbc78 1 parent 17a4f8b
@maddingue maddingue authored committed
Showing with 2 additions and 2 deletions.
  1. +2 −2 lib/POE/Component/Resolver.pm
View
4 lib/POE/Component/Resolver.pm
@@ -290,10 +290,10 @@ sub resolve {
);
my $misc = delete $args{misc};
- $misc //= "";
+ $misc = "" unless defined $misc;
my $hints = delete $args{hints};
- $hints //= { };
+ $hints ||= { };
my $event = delete $args{event};
$event = "resolver_response" unless defined $event and length $event;
Please sign in to comment.
Something went wrong with that request. Please try again.