]> jfr.im git - irc/rizon/znc.git/commitdiff
Fix modperl to properly compile with perl 5.10.0
authorpsychon <redacted>
Fri, 3 Oct 2008 18:07:22 +0000 (18:07 +0000)
committerpsychon <redacted>
Fri, 3 Oct 2008 18:07:22 +0000 (18:07 +0000)
Thanks to bigpresh and kroimon for reporting this and testing the patch.

git-svn-id: https://znc.svn.sourceforge.net/svnroot/znc/trunk@1239 726aef4b-f618-498e-8847-2d620e286838

modules/modperl.cpp

index 00d7c671b8642fa3c4ebf643b4caee1fb12dbeed..e8130f0582bd98998980039a6ee6ff00bf13d146 100644 (file)
@@ -984,8 +984,10 @@ EXTERN_C void boot_DynaLoader (pTHX_ CV* cv);
 bool CModPerl::OnLoad(const CString & sArgs, CString & sMessage)
 {
        int iArgc = 5;
-       char * pArgv[] = { "", "-e", "0", "-T", "-w", NULL };
+       char *p[] = { "", "-e", "0", "-T", "-w", NULL };
+       char **pArgv = static_cast<char **>(p);
        PERL_SYS_INIT3( &iArgc, &pArgv, &environ );
+
        m_pPerl = perl_alloc();
        perl_construct(m_pPerl);