From 80dff168fd2ec087508cc3632d4ceff4e2ec98cb Mon Sep 17 00:00:00 2001
From: Timo Sirainen <cras@irssi.org>
Date: Tue, 4 Dec 2001 16:41:49 +0000
Subject: [PATCH] added signal_get_emitted() and signal_get_emitted_id()

git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2197 dbcabf3a-b0e7-0310-adc4-f8d773084564
---
 src/perl/common/Core.xs | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/src/perl/common/Core.xs b/src/perl/common/Core.xs
index 6e0503d1..572fa52b 100644
--- a/src/perl/common/Core.xs
+++ b/src/perl/common/Core.xs
@@ -59,6 +59,16 @@ void
 signal_stop_by_name(signal)
 	char *signal
 
+char *
+signal_get_emitted()
+CODE:
+	RETVAL = (char *) signal_get_emitted();
+OUTPUT:
+	RETVAL
+
+int
+signal_get_emitted_id()
+
 int
 timeout_add(msecs, func, data)
 	int msecs