This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
fix special-case recreation of *::
authorZefram <zefram@fysh.org>
Sun, 22 Jan 2017 07:26:34 +0000 (07:26 +0000)
committerZefram <zefram@fysh.org>
Sun, 22 Jan 2017 07:26:34 +0000 (07:26 +0000)
commit120921acd4cf27bb932a725a8cf5c957652b22eb
tree6e69af609babbe0a6997f62ef0af8171aebe2a1e
parent3a0fe090c1f24f4a3748d00616b87eb4c8dd4475
fix special-case recreation of *::

If *:: is called for then as a special case it is looked up as
$::{"main::"}.  If $::{"main::"} has been deleted, then that hash entry
is recreated.  But formerly it was only recreated as an undef scalar,
which broke things relying on glob lookup returning a glob.  Now in
that special case the recreated hash entry is initialised as a glob,
and populated with the customary recursive reference to the main stash.
Fixes [perl #129869].
gv.c
t/op/stash.t