aniani/irssi
1
0
Fork 0
mirror of https://github.com/irssi/irssi.git synced 2024-11-03 04:27:19 -05:00
Code

Remove broken code that prevents unloading of a script in some cases.

Browse Source 
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@4473 dbcabf3a-b0e7-0310-adc4-f8d773084564
This commit is contained in:
Emanuele Giaquinta 2007-05-03 08:42:33 +00:00 committed by exg
parent 47117f1f5f
commit b8380772e2
1 changed files with 0 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -248,11 +248,7 @@ static int perl_script_eval(PERL_SCRIPT_REC *script)
g_free(error); g_free(error);
} }
} else if (retcount > 0) { } else if (retcount > 0) {
/* if script returns 0, it means the script wanted to die
immediately without any error message */
ret = POPs; ret = POPs;
if (ret != &PL_sv_undef && SvIOK(ret) && SvIV(ret) == 0)
error = "";
} }
PUTBACK; PUTBACK;