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

Some compiling fixes found by -Wall in perl dirs..

Browse source 
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2990 dbcabf3a-b0e7-0310-adc4-f8d773084564
This commit is contained in:
Timo Sirainen 2002-11-07 17:40:05 +00:00 • committed by cras
commit df7ccce8ec
13 changed files with 37 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

6
src/perl/common/Core.xs
View file

@ -2,6 +2,8 @@
#include "irssi-version.h"
#include "core.h"
#include "pidwait.h"
#define DEFAULT_COMMAND_CATEGORY "Perl scripts' commands"
void perl_signal_add_hash(int priority, SV *sv)
@ -194,7 +196,7 @@ CODE:
croak("Irssi::timeout() : msecs must be >= 10");
RETVAL = -1;
} else {
RETVAL = perl_timeout_add(msecs, func, data, FALSE);
RETVAL = perl_timeout_add(msecs, func, data);
}
OUTPUT:
RETVAL
@ -209,7 +211,7 @@ CODE:
croak("Irssi::timeout_once() : msecs must be >= 10");
RETVAL = -1;
} else {
RETVAL = perl_timeout_add(msecs, func, data, TRUE);
RETVAL = perl_timeout_add(msecs, func, data);
}
OUTPUT:
RETVAL