This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
https://perl5.git.perl.org / perl5.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: b588e26) | patch
Don't recurse forever if both new() and TIESCALAR() are missing.
authorAbigail <abigail@abigail.be>
Sat, 20 Feb 2010 17:55:06 +0000 (18:55 +0100)
committerAbigail <abigail@abigail.be>
Sat, 20 Feb 2010 17:55:06 +0000 (18:55 +0100)
commitbc3707112523ba7a72c27d7ae60ac3cca3ffbad1
tree506515fe4ddf915ac650d5be48749a122e7527a1tree | snapshot
parentb588e26b0530f7ecd738579dc5febbca2ebc6d7bcommit | diff
Don't recurse forever if both new() and TIESCALAR() are missing.

This should fix issue #72878. Before calling $pkg -> new in TIESCALAR,
we check whether $pkg -> new is actually the new defined in the Tie::Scalar
package; if true, croak instead of calling it.
lib/Tie/Scalar.pm diff | blob | blame | history
lib/Tie/Scalar.t diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.