iarv/znc
1
0
Fork 0
mirror of https://github.com/znc/znc.git synced 2026-03-28 17:42:41 +01:00
Code Issues Packages Projects Releases Wiki Activity

Various fixes of modperl and modpython.

Browse Source 
Including cygwin support #216
This commit is contained in:
Alexey Sokolov
2012-08-27 00:40:11 +07:00
parent a1e8b0867e
commit f80ae4aad6
6 changed files with 57 additions and 22 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
modules/modperl.cpp
View File

@@ -63,10 +63,13 @@ public:
m_pPerl = perl_alloc();
perl_construct(m_pPerl);
if (perl_parse(m_pPerl, xs_init, argc, argv, environ)) {
sMessage = "Can't initialize perl. ";
if (SvTRUE(ERRSV)) {
sMessage += PString(ERRSV);
}
perl_free(m_pPerl);
PERL_SYS_TERM();
m_pPerl = NULL;
sMessage = "Can't initialize perl.";
DEBUG(__PRETTY_FUNCTION__ << " can't init perl");
return false;
}