Merge pull request #2850 from signalwire/perl

[mod_perl] Fix implicit declaration of function
This commit is contained in:
Andrey Volk 2025-07-14 14:22:42 +03:00 committed by GitHub
commit ff18e4db5f
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194

View File

@ -45,6 +45,7 @@
#include <EXTERN.h>
#include <perl.h>
#include <switch.h>
#include "mod_perl_extra.h"
static char *embedding[] = { "", "-e", "0", NULL };
EXTERN_C void xs_init(pTHX);
@ -207,7 +208,7 @@ static perl_parse_and_execute(PerlInterpreter * my_perl, char *input_code, char
static void perl_function(switch_core_session_t *session, char *data)
static void perl_function(switch_core_session_t *session, const char *data)
{
char *uuid = switch_core_session_get_uuid(session);
PerlInterpreter *my_perl = clone_perl();