zynk/irssi
2
0
Fork 0
mirror of https://github.com/irssi/irssi.git synced 2026-08-22 18:12:12 +02:00
Code Issues Projects Releases Packages Wiki Activity

Make sure the path given to perl_script_load_file is a file.

Browse source
This commit is contained in:
LemonBoy 2016-07-12 13:32:08 +02:00
commit b87c7b31d5
1 changed files with 3 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/perl/perl-core.c
View file

@ -293,6 +293,9 @@ PERL_SCRIPT_REC *perl_script_load_file(const char *path)
g_return_val_if_fail(path != NULL, NULL); g_return_val_if_fail(path != NULL, NULL);
if (g_file_test(path, G_FILE_TEST_IS_REGULAR) == FALSE)
return NULL;
name = script_file_get_name(path); name = script_file_get_name(path);
return script_load(name, path, NULL); return script_load(name, path, NULL);
} }