Module: kamailio
Branch: master
Commit: 9490ec06d3cf0cfd0b0cf2d0a5ef701ccdabcaba
URL:
https://github.com/kamailio/kamailio/commit/9490ec06d3cf0cfd0b0cf2d0a5ef701…
Author: Daniel-Constantin Mierla <miconda(a)gmail.com>
Committer: Daniel-Constantin Mierla <miconda(a)gmail.com>
Date: 2019-09-26T23:09: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
---
Modified: src/modules/app_perl/app_perl_mod.c
---
Diff:
https://github.com/kamailio/kamailio/commit/9490ec06d3cf0cfd0b0cf2d0a5ef701…
Patch:
https://github.com/kamailio/kamailio/commit/9490ec06d3cf0cfd0b0cf2d0a5ef701…
---
diff --git a/src/modules/app_perl/app_perl_mod.c b/src/modules/app_perl/app_perl_mod.c
index 3852fa118c..2fb711706c 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) {