ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/rxvtperl.xs
(Generate patch)

Comparing rxvt-unicode/src/rxvtperl.xs (file contents):
Revision 1.260 by root, Fri Jul 7 06:10:37 2023 UTC vs.
Revision 1.261 by root, Tue Jul 25 18:06:07 2023 UTC

379 379
380static PerlInterpreter *perl; 380static PerlInterpreter *perl;
381 381
382#if 0 /* we are not a library anymore, so doing this is just not worth it */ 382#if 0 /* we are not a library anymore, so doing this is just not worth it */
383/*THINK/TODO: this has the side effect of, of course, not calling destructors. */ 383/*THINK/TODO: this has the side effect of, of course, not calling destructors. */
384/* but therse are not guaranteed anyway... */ 384/* but these are not guaranteed anyway... */
385rxvt_perl_interp::~rxvt_perl_interp () 385rxvt_perl_interp::~rxvt_perl_interp ()
386{ 386{
387 if (perl) 387 if (perl)
388 { 388 {
389 localise_env set_environ (perl_environ); 389 localise_env set_environ (perl_environ);

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines