A bit more debug output on modperl

This commit is contained in:
Alexey Sokolov
2013-07-01 20:42:58 +04:00
parent 7852e30855
commit 755c604a7c
+1
View File
@@ -165,6 +165,7 @@ public:
if (SvTRUE(ERRSV)) {
bSuccess = false;
sRetMsg = PString(ERRSV);
DEBUG("Perl ZNC::Core::GetModInfo died: " << sRetMsg);
} else if (0 < ret) {
switch(static_cast<ELoadPerlMod>(SvUV(ST(0)))) {
case Perl_NotFound: