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

return value wasn't a good idea after all - added Irssi::timeout_add_once()

Browse source 
instead.


git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2758 dbcabf3a-b0e7-0310-adc4-f8d773084564
This commit is contained in:
Timo Sirainen 2002-05-07 23:40:21 +00:00 • committed by cras
commit c1384d919b
2 changed files with 25 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -193,7 +193,22 @@ CODE:
croak("Irssi::timeout() : msecs must be >= 10");
RETVAL = -1;
} else {
RETVAL = perl_timeout_add(msecs, func, data);
RETVAL = perl_timeout_add(msecs, func, data, FALSE);
}
OUTPUT:
RETVAL
int
timeout_add_once(msecs, func, data)
int msecs
SV *func
SV *data
CODE:
if (msecs < 10) {
croak("Irssi::timeout_once() : msecs must be >= 10");
RETVAL = -1;
} else {
RETVAL = perl_timeout_add(msecs, func, data, TRUE);
}
OUTPUT:
RETVAL