Skip to content

Commit ff18e4d

Browse files
authored
Merge pull request #2850 from signalwire/perl
[mod_perl] Fix implicit declaration of function
2 parents 7a650ef + 2c51711 commit ff18e4d

File tree

1 file changed

+2
-1
lines changed

1 file changed

+2
-1
lines changed

src/mod/languages/mod_perl/mod_perl.c

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -45,6 +45,7 @@
4545
#include <EXTERN.h>
4646
#include <perl.h>
4747
#include <switch.h>
48+
#include "mod_perl_extra.h"
4849
static char *embedding[] = { "", "-e", "0", NULL };
4950
EXTERN_C void xs_init(pTHX);
5051

@@ -207,7 +208,7 @@ static perl_parse_and_execute(PerlInterpreter * my_perl, char *input_code, char
207208

208209

209210

210-
static void perl_function(switch_core_session_t *session, char *data)
211+
static void perl_function(switch_core_session_t *session, const char *data)
211212
{
212213
char *uuid = switch_core_session_get_uuid(session);
213214
PerlInterpreter *my_perl = clone_perl();

0 commit comments

Comments
 (0)