From 7bba8f19c55180a3cf2dee982b1e07a76e50fddd Mon Sep 17 00:00:00 2001
From: Timo Sirainen <cras@irssi.org>
Date: Wed, 18 Oct 2000 22:45:26 +0000
Subject: updates

git-svn-id: http://svn.irssi.org/repos/irssi/trunk@770 dbcabf3a-b0e7-0310-adc4-f8d773084564
---
 src/perl/common/module.h |  7 +++++++
 src/perl/common/typemap  |  4 ++++
 src/perl/get-signals.pl  | 21 ++++++++++++++++-----
 3 files changed, 27 insertions(+), 5 deletions(-)

(limited to 'src')

diff --git a/src/perl/common/module.h b/src/perl/common/module.h
index fec283f0..5eb6cf32 100644
--- a/src/perl/common/module.h
+++ b/src/perl/common/module.h
@@ -12,6 +12,7 @@
 #include "settings.h"
 #include "masks.h"
 
+#include "chatnets.h"
 #include "servers.h"
 #include "servers-reconnect.h"
 #include "servers-setup.h"
@@ -22,13 +23,17 @@
 #include "perl/perl-common.h"
 
 #include "fe-common/core/windows.h"
+#include "fe-common/core/themes.h"
+#include "fe-common/core/keyboard.h"
 
 typedef COMMAND_REC *Irssi__Command;
 typedef LOG_REC *Irssi__Log;
 typedef LOG_ITEM_REC *Irssi__LogItem;
 typedef RAWLOG_REC *Irssi__Rawlog;
 typedef IGNORE_REC *Irssi__Ignore;
+typedef MODULE_REC *Irssi__Module;
 
+typedef CHATNET_REC *Irssi__Chatnet;
 typedef SERVER_REC *Irssi__Server;
 typedef SERVER_CONNECT_REC *Irssi__Connect;
 typedef RECONNECT_REC *Irssi__Reconnect;
@@ -36,5 +41,7 @@ typedef CHANNEL_REC *Irssi__Channel;
 typedef QUERY_REC *Irssi__Query;
 typedef NICK_REC *Irssi__Nick;
 
+typedef THEME_REC *Irssi__Theme;
+typedef KEYINFO_REC *Irssi__Keyinfo;
 typedef WINDOW_REC *Irssi__Window;
 typedef WI_ITEM_REC *Irssi__Windowitem;
diff --git a/src/perl/common/typemap b/src/perl/common/typemap
index 7e2cf17e..b642cbb4 100644
--- a/src/perl/common/typemap
+++ b/src/perl/common/typemap
@@ -1,4 +1,5 @@
 TYPEMAP
+Irssi::Chatnet		T_PTROBJ
 Irssi::Server		T_PTROBJ
 Irssi::Connect		T_PTROBJ
 Irssi::Reconnect	T_PTROBJ
@@ -10,5 +11,8 @@ Irssi::Ignore		T_PTROBJ
 Irssi::Log		T_PTROBJ
 Irssi::LogItem       	T_PTROBJ
 Irssi::Rawlog		T_PTROBJ
+Irssi::Module		T_PTROBJ
+Irssi::Theme		T_PTROBJ
+Irssi::Keyinfo		T_PTROBJ
 Irssi::Window		T_PTROBJ
 Irssi::Windowitem	T_PTROBJ
diff --git a/src/perl/get-signals.pl b/src/perl/get-signals.pl
index 716e25f2..65355d3d 100755
--- a/src/perl/get-signals.pl
+++ b/src/perl/get-signals.pl
@@ -5,7 +5,6 @@ print "static PERL_SIGNAL_ARGS_REC perl_signal_args[] =\n{\n";
 while (<STDIN>) {
 	chomp;
 
-	last if (/UI common/);
 	next if (!/^ "([^"]*)"(<.*>)?,\s*(.*)/);
 	next if (/\.\.\./);
 	next if (/\(/);
@@ -18,20 +17,32 @@ while (<STDIN>) {
 	s/int[^,]*/int/g;
 	s/GSList of (\w+)s/gslist_\1/g;
 
+	# core
+        s/CHATNET_REC[^,]*/iobject/g;
         s/SERVER_REC[^,]*/iobject/g;
         s/RECONNECT_REC[^,]*/iobject/g;
 	s/CHANNEL_REC[^,]*/iobject/g;
 	s/QUERY_REC[^,]*/iobject/g;
 	s/COMMAND_REC[^,]*/Irssi::Command/g;
 	s/NICK_REC[^,]*/Irssi::Nick/g;
+	s/LOG_REC[^,]*/Irssi::Log/g;
+	s/RAWLOG_REC[^,]*/Irssi::Rawlog/g;
+	s/IGNORE_REC[^,]*/Irssi::Ignore/g;
+	s/MODULE_REC[^,]*/Irssi::Module/g;
+
+	# irc
 	s/BAN_REC[^,]*/Irssi::Ban/g;
-	s/DCC_REC[^,]*/Irssi::Dcc/g;
 	s/NETSPLIT_REC[^,]*/Irssi::Netsplit/g;
+	s/NETSPLIT_SERVER_REC[^,]*/Irssi::Netsplitserver/g;
+
+	# irc modules
+	s/DCC_REC[^,]*/Irssi::Dcc/g;
 	s/AUTOIGNORE_REC[^,]*/Irssi::Autoignore/g;
-	s/LOG_REC[^,]*/Irssi::Log/g;
-	s/RAWLOG_REC[^,]*/Irssi::Rawlog/g;
 	s/NOTIFYLIST_REC[^,]*/Irssi::Notifylist/g;
-	s/IGNORE_REC[^,]*/Irssi::Ignore/g;
+
+	# fe-common
+	s/THEME_REC[^,]*/Irssi::Theme/g;
+	s/KEYINFO_REC[^,]*/Irssi::Keyinfo/g;
 	s/WINDOW_REC[^,]*/Irssi::Window/g;
 	s/WI_ITEM_REC[^,]*/iobject/g;
 
-- 
cgit v1.2.3