From c9f6f040796c98854bf15958e3cb0121bf89f6d0 Mon Sep 17 00:00:00 2001
From: Timo Sirainen <cras@irssi.org>
Date: Sun, 24 Mar 2002 16:35:20 +0000
Subject: [PATCH] destruct level isn't touched anymore, it crashes irssi with a
 few people..

git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2641 dbcabf3a-b0e7-0310-adc4-f8d773084564
---
 src/perl/perl-core.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/perl/perl-core.c b/src/perl/perl-core.c
index 1ed95c37..accd5ef4 100644
--- a/src/perl/perl-core.c
+++ b/src/perl/perl-core.c
@@ -444,7 +444,7 @@ void perl_core_init(void)
         print_script_errors = 1;
 	settings_add_str("perl", "perl_use_lib", PERL_USE_LIB);
 
-	PL_perl_destruct_level = 1;
+	/*PL_perl_destruct_level = 1; - this crashes with some people.. */
 	perl_signals_init();
         signal_add_last("script error", (SIGNAL_FUNC) sig_script_error);