mirror of
https://github.com/irssi/irssi.git
synced 2024-12-04 14:46:39 -05:00
Merge pull request #382 from ailin-nemui/staticperl
ensure staticlib perl works on 5.22
This commit is contained in:
commit
7b69b98812
@ -246,10 +246,7 @@ char *perl_get_use_list(void)
|
||||
|
||||
void irssi_callXS(void (*subaddr)(pTHX_ CV* cv), CV *cv, SV **mark)
|
||||
{
|
||||
dSP;
|
||||
|
||||
PUSHMARK(mark);
|
||||
PUTBACK;
|
||||
|
||||
(*subaddr)(aTHX_ cv);
|
||||
}
|
||||
|
@ -125,7 +125,7 @@ void perl_scripts_init(void)
|
||||
|
||||
perl_parse(my_perl, xs_init, G_N_ELEMENTS(perl_args), perl_args, NULL);
|
||||
#if PERL_STATIC_LIBS == 1
|
||||
perl_eval_pv("Irssi::Core::boot_Irssi_Core();", TRUE);
|
||||
perl_eval_pv("Irssi::Core::->boot_Irssi_Core(0.9);", TRUE);
|
||||
#endif
|
||||
|
||||
perl_common_start();
|
||||
|
Loading…
Reference in New Issue
Block a user