diff options
author | Father Chrysostomos <sprout@cpan.org> | 2010-12-02 09:36:41 -0800 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2010-12-02 17:45:06 -0800 |
commit | 7850f4d6b732ab5f426cd3bcd9757c70a46cfda1 (patch) | |
tree | d0b896978fba6773c5fab519c3f6f6054b1c4302 /pp_sys.c | |
parent | 84b9ac853508aaff52254b6cf2b95a2a6783ff00 (diff) | |
download | perl-7850f4d6b732ab5f426cd3bcd9757c70a46cfda1.tar.gz |
Revert "[perl #77688] tie $scalar can tie a handle"
This reverts commit 9aa8b00892d81bb5e94565d3cb9841dd57b7b9cf.
Diffstat (limited to 'pp_sys.c')
-rw-r--r-- | pp_sys.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -826,7 +826,7 @@ PP(pp_tie) break; case SVt_PVGV: case SVt_PVLV: - if (isGV_with_GP(varsv) && !SvFAKE(varsv)) { + if (isGV_with_GP(varsv)) { methname = "TIEHANDLE"; how = PERL_MAGIC_tiedscalar; /* For tied filehandles, we apply tiedscalar magic to the IO |