… | … | ||
---|---|---|---|
377 | /* but therse are not guaranteed anyway... */ | 377 | /* but therse are not guaranteed anyway... */ |
378 | rxvt_perl_interp::~rxvt_perl_interp () | 378 | rxvt_perl_interp::~rxvt_perl_interp () |
379 | { | 379 | { |
380 | if (perl) | 380 | if (perl) |
381 | { | 381 | { |
382 | localise_env set_environ (perl_environ); | ||
382 | perl_destruct (perl); | 383 | perl_destruct (perl); |
383 | perl_free (perl); | 384 | perl_free (perl); |
384 | PERL_SYS_TERM (); | 385 | PERL_SYS_TERM (); |
385 | } | 386 | } |
386 | } | 387 | } |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |