[sr-dev] git:master:e53db293: app_perl: if warn_mode is 2, set -W for perl_parse()

Module: kamailio Branch: master Commit: e53db29378b452c79654b220353fa794081597f7 URL: https://github.com/kamailio/kamailio/commit/e53db29378b452c79654b220353fa79… Author: Daniel-Constantin Mierla <miconda(a)gmail.com> Committer: Daniel-Constantin Mierla <miconda(a)gmail.com> Date: 2022-07-13T18:24:50+02:00 app_perl: if warn_mode is 2, set -W for perl_parse() --- Modified: src/modules/app_perl/app_perl_mod.c --- Diff: https://github.com/kamailio/kamailio/commit/e53db29378b452c79654b220353fa79… Patch: https://github.com/kamailio/kamailio/commit/e53db29378b452c79654b220353fa79… --- diff --git a/src/modules/app_perl/app_perl_mod.c b/src/modules/app_perl/app_perl_mod.c index 67120d49e4..1c55c14c28 100644 --- a/src/modules/app_perl/app_perl_mod.c +++ b/src/modules/app_perl/app_perl_mod.c @@ -212,6 +212,8 @@ int parser_init(void) { if(_ap_warn_mode==1) { argv[argc] = "-w"; argc++; + } else if(_ap_warn_mode==2) { + argv[argc] = "-W"; argc++; } /* Possible Include path extension by modparam */