diff options
| author |  Fabio Bas | 2017-02-04 17:57:12 +0100 |
|---|---|---|
| committer |  IceN9ne | 2017-02-09 19:52:30 -0500 |
| commit | 256ee1f5a1908ae1a0de98af4639eb9d0d427fc5 (patch) | |
| tree | 105dabe27c41413a704e3f115bb2f302048e31ba | |
| parent | KviProxy: Make class member data private (diff) | |
| download | KVIrc-256ee1f5a1908ae1a0de98af4639eb9d0d427fc5.tar.gz KVIrc-256ee1f5a1908ae1a0de98af4639eb9d0d427fc5.tar.bz2 KVIrc-256ee1f5a1908ae1a0de98af4639eb9d0d427fc5.zip | |
fix #1105
| -rw-r--r-- | src/modules/perlcore/libkviperlcore.cpp | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/src/modules/perlcore/libkviperlcore.cpp b/src/modules/perlcore/libkviperlcore.cpp index 3f96bacc5..fcd66152b 100644 --- a/src/modules/perlcore/libkviperlcore.cpp +++ b/src/modules/perlcore/libkviperlcore.cpp @@ -435,7 +435,11 @@ static bool perlcore_module_cleanup(KviModule *) static bool perlcore_module_can_unload(KviModule *) { #ifdef COMPILE_PERL_SUPPORT - return (g_pInterpreters->count() == 0); + return false; + /* return (g_pInterpreters->count() == 0); + * Perlcore module can't be cleanly unloaded since PERL_SYS_INIT3 + * and PERL_SYS_TERM should never be called more than once (#1105) + */ #endif // COMPILE_PERL_SUPPORT return true; } |