diff options
author | Father Chrysostomos <sprout@cpan.org> | 2011-08-21 20:43:21 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2011-08-21 20:43:21 -0700 |
commit | f8326b3e75b86d985f87404e11ed018bc037a3af (patch) | |
tree | 87a2ebc7d1d66ad05beaa703b1df1e50b8f5322f /gv.c | |
parent | ea3b834e87e81ac3f0144ea0c26617a0ddb5d361 (diff) | |
download | perl-f8326b3e75b86d985f87404e11ed018bc037a3af.tar.gz |
Make defined(${'$'}) return true
Commit 0e219455 made $$ into a magical variable that is not created
on startup.
Usually perl pretends that built-in vars created on the fly have
always existed. But commit 0e219455 did not add $$ to the list of
such variables in is_gv_magical_sv. So defined ${'$'} started return-
ing false.
Diffstat (limited to 'gv.c')
-rw-r--r-- | gv.c | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -2771,6 +2771,7 @@ Perl_is_gv_magical_sv(pTHX_ SV *const name_sv, U32 flags) case '>': case '\\': case '/': + case '$': case '|': case '+': case ';': |