mirror of
https://github.com/znc/znc.git
synced 2026-07-03 00:11:59 +02:00
make PERL_EXIT_DESTRUCT_END optional
git-svn-id: https://znc.svn.sourceforge.net/svnroot/znc/trunk@271 726aef4b-f618-498e-8847-2d620e286838
This commit is contained in:
@@ -473,7 +473,9 @@ bool CModPerl::OnLoad( const CString & sArgs )
|
||||
};
|
||||
|
||||
perl_parse( m_pPerl, NULL, 2, (char **)pArgv, (char **)NULL );
|
||||
#ifdef PERL_EXIT_DESTRUCT_END
|
||||
PL_exit_flags |= PERL_EXIT_DESTRUCT_END;
|
||||
#endif /* PERL_EXIT_DESTRUCT_END */
|
||||
|
||||
newXS( "AddHook", XS_AddHook, (char *)__FILE__ );
|
||||
newXS( "DelHook", XS_DelHook, (char *)__FILE__ );
|
||||
|
||||
Reference in New Issue
Block a user