pegasus/weechat
1
0
Fork 0
mirror of https://github.com/weechat/weechat.git synced 2026-06-30 06:46:38 +02:00
Code Activity

perl: fix context used after unload of a script

Browse Source
This commit is contained in:
Sebastien Helleu
2014-02-17 21:57:51 +01:00
parent 5ac3d538b8
commit 77058acc0a
2 changed files with 5 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/plugins/perl/weechat-perl.c
+4
View File
@@ -538,6 +538,10 @@ weechat_perl_unload (struct t_plugin_script *script)
perl_destruct (interpreter);
perl_free (interpreter);
}
if (perl_current_script)
{
PERL_SET_CONTEXT (perl_current_script->interpreter);
}
#else
if (interpreter)
free (interpreter);