From 2523a02104fbc885138d1e63016bace31734b124 Mon Sep 17 00:00:00 2001
From: Timo Sirainen <cras@irssi.org>
Date: Sun, 17 Dec 2000 01:29:07 +0000
Subject: Irssi::printformat() syntax changed: removed server and target, use
 $server->printformat() or $target->printformat() if needed..

git-svn-id: http://svn.irssi.org/repos/irssi/trunk@997 dbcabf3a-b0e7-0310-adc4-f8d773084564
---
 src/perl/common/Themes.xs | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

(limited to 'src')

diff --git a/src/perl/common/Themes.xs b/src/perl/common/Themes.xs
index 88067562..46958b63 100644
--- a/src/perl/common/Themes.xs
+++ b/src/perl/common/Themes.xs
@@ -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) : "";
-- 
cgit v1.2.3