1
0
mirror of https://github.com/weechat/weechat.git synced 2026-06-25 20:36:38 +02:00

Fix bug with perl script filename when multiplicity is disabled (bug #29530)

This commit is contained in:
Sebastien Helleu
2010-04-13 00:02:07 +02:00
parent acca17d142
commit aeee1856eb
2 changed files with 3 additions and 3 deletions
+1 -2
View File
@@ -288,6 +288,7 @@ weechat_perl_load (const char *filename)
}
perl_current_script = NULL;
perl_current_script_filename = filename;
perl_registered_script = NULL;
#ifdef MULTIPLICITY
@@ -302,8 +303,6 @@ weechat_perl_load (const char *filename)
return 0;
}
perl_current_script_filename = filename;
PERL_SET_CONTEXT (perl_current_interpreter);
perl_construct (perl_current_interpreter);
temp_script.interpreter = (PerlInterpreter *) perl_current_interpreter;