diff options
author | Father Chrysostomos <sprout@cpan.org> | 2011-05-12 22:16:57 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2011-05-18 14:54:34 -0700 |
commit | 640c0c3e6cbf43a7a03079adc89e0ad39fb33a19 (patch) | |
tree | c0f937d6b2af5e1fbbdff816e0396de0d7d5a925 /sv.c | |
parent | 63c9c6618f11b54b040d7136bc4f6cf8cf304247 (diff) | |
download | perl-640c0c3e6cbf43a7a03079adc89e0ad39fb33a19.tar.gz |
Revert "Partially revert 4155e4fe"
This reverts commit 7f586e41ad4ecd904c7d8dbe1ddb0f9410484bac.
Diffstat (limited to 'sv.c')
-rw-r--r-- | sv.c | 2 |
1 files changed, 0 insertions, 2 deletions
@@ -582,9 +582,7 @@ Perl_sv_clean_objs(pTHX) visit(do_clean_named_io_objs, SVt_PVGV|SVpgv_GP, SVTYPEMASK|SVp_POK|SVpgv_GP); /* And if there are some very tenacious barnacles clinging to arrays, closures, or what have you.... */ - /* XXX This line breaks Tk and Gtk2. See [perl #82542]. visit(do_curse, SVs_OBJECT, SVs_OBJECT); - */ olddef = PL_defoutgv; PL_defoutgv = NULL; /* disable skip of PL_defoutgv */ if (olddef && isGV_with_GP(olddef)) |