diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2010-12-02 09:36:35 -0800 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2010-12-02 17:45:05 -0800 |
| commit | 84b9ac853508aaff52254b6cf2b95a2a6783ff00 (patch) | |
| tree | fa304bbcca315e9c29021b3bee9524e710f607e9 /pp_sys.c | |
| parent | 8cbe99e5b6fe99a6bc17c0b0cee249bac3565da4 (diff) | |
| download | perl-84b9ac853508aaff52254b6cf2b95a2a6783ff00.tar.gz | |
Revert "Make untie check the FAKE flag on globs"
This reverts commit 830748013f81bcc28d145baf4024efd1b6537704.
Diffstat (limited to 'pp_sys.c')
| -rw-r--r-- | pp_sys.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -903,7 +903,7 @@ PP(pp_untie) const char how = (SvTYPE(sv) == SVt_PVHV || SvTYPE(sv) == SVt_PVAV) ? PERL_MAGIC_tied : PERL_MAGIC_tiedscalar; - if (isGV_with_GP(sv) && !SvFAKE(sv) && !(sv = MUTABLE_SV(GvIOp(sv)))) + if (isGV_with_GP(sv) && !(sv = MUTABLE_SV(GvIOp(sv)))) RETPUSHYES; if ((mg = SvTIED_mg(sv, how))) { |