From 4aa01bcb717f3ed8fb7d8a86fc72a7f3fe6e64cc Mon Sep 17 00:00:00 2001
From: psychon <psychon@726aef4b-f618-498e-8847-2d620e286838>
Date: Fri, 3 Oct 2008 18:07:22 +0000
Subject: [PATCH] Fix modperl to properly compile with perl 5.10.0

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 | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/modules/modperl.cpp b/modules/modperl.cpp
index 00d7c671..e8130f05 100644
--- a/modules/modperl.cpp
+++ b/modules/modperl.cpp
@@ -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);