--- rxvt-unicode/src/rxvtperl.xs	2020/01/20 09:35:12	1.246
+++ rxvt-unicode/src/rxvtperl.xs	2020/06/30 07:31:24	1.247
@@ -372,6 +372,9 @@
 
 static PerlInterpreter *perl;
 
+#if 0 /* we are not a library anymore, so doing this is just not worth it */
+/*THINK/TODO: this has the side effect of, of course, not calling destructors. */
+/* but therse are not guaranteed anyway... */
 rxvt_perl_interp::~rxvt_perl_interp ()
 {
   if (perl)
@@ -381,6 +384,7 @@
       PERL_SYS_TERM ();
     }
 }
+#endif
 
 void
 rxvt_perl_interp::init ()