kenmirrors
/
freeswitch
mirror of https://github.com/signalwire/freeswitch.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

FS-5416 --resolve just missing the part that registers it

This commit is contained in:
Anthony Minessale 2013-05-14 07:38:00 -05:00
parent fcb699c8b7
commit ec7d8a0118
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/mod/languages/mod_perl/mod_perl.c
View File

@ -501,6 +501,7 @@ SWITCH_MODULE_LOAD_FUNCTION(mod_perl_load)
PerlInterpreter *my_perl;
char code[1024];
switch_api_interface_t *api_interface;
switch_chat_application_interface_t *chat_app_interface;
globals.pool = pool;
@ -521,6 +522,8 @@ SWITCH_MODULE_LOAD_FUNCTION(mod_perl_load)
SWITCH_ADD_APP(app_interface, "perl", NULL, NULL, perl_function, NULL, SAF_SUPPORT_NOMEDIA);
SWITCH_ADD_API(api_interface, "perlrun", "run a script", perlrun_api_function, "<script>");
SWITCH_ADD_API(api_interface, "perl", "run a script", perl_api_function, "<script>");
SWITCH_ADD_CHAT_APP(chat_app_interface, "perl", "execute a perl script", "execute a perl script", perl_chat_function, "<script>", SCAF_NONE);
/* indicate that the module should continue to be loaded */
do_config();