mirror of
https://github.com/znc/znc.git
synced 2026-08-06 08:52:57 +02:00
fix arg to PERL_SYS_INIT3
git-svn-id: https://znc.svn.sourceforge.net/svnroot/znc/trunk@1156 726aef4b-f618-498e-8847-2d620e286838
This commit is contained in:
+1
-1
@@ -986,7 +986,7 @@ bool CModPerl::OnLoad(const CString & sArgs, CString & sMessage)
|
||||
{
|
||||
const int iArgc = 5;
|
||||
const char *pArgv[] = { "", "-e", "0", "-T", "-w", NULL };
|
||||
PERL_SYS_INIT3( &iArgc, &pArgc, NULL );
|
||||
PERL_SYS_INIT3( &iArgc, &pArgv, NULL );
|
||||
m_pPerl = perl_alloc();
|
||||
perl_construct(m_pPerl);
|
||||
|
||||
|
||||
Reference in New Issue
Block a user