This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
tighten Storable's recognition of tied SVs
authorZefram <zefram@fysh.org>
Tue, 8 Apr 2014 18:03:59 +0000 (19:03 +0100)
committerZefram <zefram@fysh.org>
Tue, 8 Apr 2014 18:03:59 +0000 (19:03 +0100)
commit4189a2e6d672429e2ca18905be111293b105233b
treeced4f736670a1ff2bd31b87d0eb0d8e49f9a3734
parent8ce7a7e8b08f04e70601dd7b8717af879a4ea397
tighten Storable's recognition of tied SVs

Since commit ff44333e5a9d9dca5272bb166df463607ebd3020, being RMAGICAL
and having tie magic is not sufficient to recognise an SV as tied.
When magic is turned off for mg_set(), the RMAGICAL flag is now left on,
so that vstrings will be recognised as such.  So Storable needs to check
whether the tie magic it sees is actually in effect, by also looking at
the GMAGICAL and SMAGICAL flags.
MANIFEST
dist/Storable/Storable.pm
dist/Storable/Storable.xs
dist/Storable/t/tied_store.t [new file with mode: 0644]