From 463d5fbd2f47f7a9412533da255c7de188b29ed1 Mon Sep 17 00:00:00 2001 From: Timo Sirainen Date: Fri, 20 Apr 2001 19:08:21 +0000 Subject: [PATCH] Irssi::printformat() didn't work git-svn-id: http://svn.irssi.org/repos/irssi/trunk@1452 dbcabf3a-b0e7-0310-adc4-f8d773084564 --- src/perl/common/Themes.xs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/perl/common/Themes.xs b/src/perl/common/Themes.xs index 47654fce..1d905323 100644 --- a/src/perl/common/Themes.xs +++ b/src/perl/common/Themes.xs @@ -44,8 +44,8 @@ PREINIT: CODE: 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) : ""; + for (n = 2; n < 2+MAX_FORMAT_PARAMS; n++) { + arglist[n-2] = n < items ? SvPV(ST(n), PL_na) : ""; } printformat_perl(&dest, format, arglist);