aniani/irssi
1
0
Fork 0
mirror of https://github.com/irssi/irssi.git synced 2024-06-23 06:35:36 +00:00
Code

Irssi::printformat() syntax changed: removed server and target, use

Browse Source 
$server->printformat() or $target->printformat() if needed..


git-svn-id: http://svn.irssi.org/repos/irssi/trunk@997 dbcabf3a-b0e7-0310-adc4-f8d773084564
This commit is contained in:
Timo Sirainen 2000-12-17 01:29:07 +00:00 committed by cras
parent 6e19541f46
commit 2523a02104
1 changed files with 3 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
src/perl/common/Themes.xs
View File

@ -1,3 +1,4 @@
MODULE = Irssi PACKAGE = Irssi
void
@ -33,9 +34,7 @@ CODE:
theme_register_module(perl_get_package(), formatrecs);
void
printformat(server, target, level, format, ...)
Irssi::Server server
char *target
printformat(level, format, ...)
int level
char *format
PREINIT:
@ -43,7 +42,7 @@ PREINIT:
char *arglist[MAX_FORMAT_PARAMS];
int n;
CODE:
format_create_dest(&dest, server, target, level, NULL);
format_create_dest(&dest, NULL, NULL, level, NULL);
memset(arglist, 0, sizeof(arglist));
for (n = 4; n < 4+MAX_FORMAT_PARAMS; n++) {
arglist[n-4] = n < items ? SvPV(ST(n), PL_na) : "";