Module: kamailio Branch: 5.2 Commit: 7e7621a93013174bf42ff0dd782a46d238c0943a URL: https://github.com/kamailio/kamailio/commit/7e7621a93013174bf42ff0dd782a46d2...
Author: Daniel-Constantin Mierla miconda@gmail.com Committer: Daniel-Constantin Mierla miconda@gmail.com Date: 2019-10-07T10:38:37+02:00
app_perl: set G_EVAL flag when executing perl_destroy_func
- trap use of die in the perl libs to avoid having an exit when reset_cycles is used
(cherry picked from commit 9490ec06d3cf0cfd0b0cf2d0a5ef701ccdabcaba)
---
Modified: src/modules/app_perl/app_perl_mod.c
---
Diff: https://github.com/kamailio/kamailio/commit/7e7621a93013174bf42ff0dd782a46d2... Patch: https://github.com/kamailio/kamailio/commit/7e7621a93013174bf42ff0dd782a46d2...
---
diff --git a/src/modules/app_perl/app_perl_mod.c b/src/modules/app_perl/app_perl_mod.c index d8789f919d..181f70f859 100644 --- a/src/modules/app_perl/app_perl_mod.c +++ b/src/modules/app_perl/app_perl_mod.c @@ -401,7 +401,7 @@ int app_perl_reset_interpreter(void) return 0;
if(perl_destroy_func) - call_argv(perl_destroy_func, G_DISCARD | G_NOARGS, args); + call_argv(perl_destroy_func, G_DISCARD | G_NOARGS | G_EVAL, args);
gettimeofday(&t1, NULL); if (perl_reload()<0) {
-
Daniel-Constantin Mierla