ports/net/p5-RPC-XML/files/patch-lib-RPC-XML.pm
Dag-Erling Smørgrav c51f1c92df Fix loop detection bug.
Approved by:	perl (tobez)
2013-04-23 10:39:26 +00:00

10 lines
434 B
Perl

--- lib/RPC/XML.pm.orig 2011-08-22 11:29:30.000000000 +0200
+++ lib/RPC/XML.pm 2013-04-23 10:28:19.780990362 +0200
@@ -258,6 +258,7 @@
$type = reftype $_;
die "Un-convertable reference: $type, cannot use\n";
}
+ $seenrefs->{$_}--;
}
# You have to check ints first, because they match the
# next pattern (for doubles) too