aniani/irssi
1
0
Fork 0
mirror of https://github.com/irssi/irssi.git synced 2025-01-03 14:56:47 -05:00
Code

Irssi crashed if loading script failed.

Browse Source 
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@1713 dbcabf3a-b0e7-0310-adc4-f8d773084564
This commit is contained in:
Timo Sirainen 2001-08-07 21:03:26 +00:00 committed by cras
parent b80d4e62ab
commit be601764ae
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -230,10 +230,8 @@ static PERL_SCRIPT_REC *script_load(char *name, const char *path,
perl_scripts = g_slist_append(perl_scripts, script);
signal_emit("script created", 1, script);
if (!perl_script_eval(script)) {
perl_script_unload(script);
script = NULL;
}
if (!perl_script_eval(script))
script = NULL; /* the script is destroyed in "script error" signal */
return script;
}