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

remove unused perl_current_script_filename variable

Browse Source
This commit is contained in:
Emmanuel Bouthenot
2005-11-28 19:32:48 +00:00
parent 62bc46cb1d
commit b821783bbf
2 changed files with 0 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/plugins/scripts/perl/weechat-perl.c
-4
View File
@@ -36,7 +36,6 @@ t_weechat_plugin *perl_plugin;
t_plugin_script *perl_scripts = NULL;
t_plugin_script *perl_current_script = NULL;
char *perl_current_script_filename = NULL;
extern void boot_DynaLoader (pTHX_ CV* cv);
@@ -904,9 +903,6 @@ weechat_perl_load (t_weechat_plugin *plugin, char *filename)
return 0;
}
perl_current_script_filename = strdup (filename);
free (perl_current_script_filename);
if (perl_current_script == NULL) {
plugin->printf_server (plugin,
"Perl error: function \"register\" not found "