diff options
Diffstat (limited to 'src/plugins/perl/weechat-perl.c')
| -rw-r--r-- | src/plugins/perl/weechat-perl.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/plugins/perl/weechat-perl.c b/src/plugins/perl/weechat-perl.c index ce3f5968e..e4fad167b 100644 --- a/src/plugins/perl/weechat-perl.c +++ b/src/plugins/perl/weechat-perl.c @@ -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); |