aniani/irssi
1
0
Fork 0
mirror of https://github.com/irssi/irssi.git synced 2025-02-02 15:08:01 -05:00
Code

Use PERL_SYS_INIT3 with the correct pointer type for argv.

Browse Source 
This fixes perl crashes on startup on some machines.


git-svn-id: file:///var/www/svn.irssi.org/SVN/irssi/trunk@4989 dbcabf3a-b0e7-0310-adc4-f8d773084564
This commit is contained in:
Jilles Tjoelker 2009-01-15 22:21:31 +00:00 committed by jilles
parent 57282ee557
commit d993ce7b06
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/perl/perl-core.c
View File

@ -111,7 +111,8 @@ static void xs_init(pTHX)
/* Initialize perl interpreter */
void perl_scripts_init(void)
{
char *args[] = {"", "-e", "0"};
char *argarray[] = {"", "-e", "0"};
char **args = argarray;
int argc = 3;
char *code, *use_code;