From c79becdc8502c6839757eb4417ec2b8ec332b428 Mon Sep 17 00:00:00 2001 From: Sebastien Helleu Date: Mon, 21 May 2007 16:11:27 +0000 Subject: [PATCH] Removed compile warning in Perl script plugin --- src/plugins/scripts/perl/weechat-perl.c | 2 +- weechat/src/plugins/scripts/perl/weechat-perl.c | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/src/plugins/scripts/perl/weechat-perl.c b/src/plugins/scripts/perl/weechat-perl.c index 66418273f..d000ac971 100644 --- a/src/plugins/scripts/perl/weechat-perl.c +++ b/src/plugins/scripts/perl/weechat-perl.c @@ -178,7 +178,7 @@ weechat_perl_exec (t_weechat_plugin *plugin, if (SvTRUE (ERRSV)) { plugin->print_server (plugin, "Perl error: %s", SvPV_nolen (ERRSV)); - POPs; /* poping the 'undef' */ + (void) POPs; /* poping the 'undef' */ mem_err = 0; } else diff --git a/weechat/src/plugins/scripts/perl/weechat-perl.c b/weechat/src/plugins/scripts/perl/weechat-perl.c index 66418273f..d000ac971 100644 --- a/weechat/src/plugins/scripts/perl/weechat-perl.c +++ b/weechat/src/plugins/scripts/perl/weechat-perl.c @@ -178,7 +178,7 @@ weechat_perl_exec (t_weechat_plugin *plugin, if (SvTRUE (ERRSV)) { plugin->print_server (plugin, "Perl error: %s", SvPV_nolen (ERRSV)); - POPs; /* poping the 'undef' */ + (void) POPs; /* poping the 'undef' */ mem_err = 0; } else