summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorTimo Sirainen <cras@irssi.org>2001-06-01 17:53:14 +0000
committercras <cras@dbcabf3a-b0e7-0310-adc4-f8d773084564>2001-06-01 17:53:14 +0000
commit99e9ab582fc0e2da20c9be3ffb6d4a1a26665190 (patch)
treee20a4ab6f2e5aa7b02a8d0e4230abbd6dda39022
parent62aa12c411d4283cd11dc0a4f015ab863f48d0f8 (diff)
downloadirssi-99e9ab582fc0e2da20c9be3ffb6d4a1a26665190.zip
added Irssi::parse_special()
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@1529 dbcabf3a-b0e7-0310-adc4-f8d773084564
-rw-r--r--src/perl/common/Core.xs40
-rw-r--r--src/perl/common/module.h1
2 files changed, 41 insertions, 0 deletions
diff --git a/src/perl/common/Core.xs b/src/perl/common/Core.xs
index a225d09a..ea078b57 100644
--- a/src/perl/common/Core.xs
+++ b/src/perl/common/Core.xs
@@ -348,3 +348,43 @@ pidwait_add(pid)
void
pidwait_remove(pid)
int pid
+
+char *
+parse_special(cmd, data="", flags=0)
+ char *cmd
+ char *data
+ int flags
+CODE:
+ RETVAL = parse_special_string(cmd, NULL, NULL, data, NULL, flags);
+OUTPUT:
+ RETVAL
+
+#*******************************
+MODULE = Irssi PACKAGE = Irssi::Server
+#*******************************
+
+char *
+parse_special(server, cmd, data="", flags=0)
+ Irssi::Server server
+ char *cmd
+ char *data
+ int flags
+CODE:
+ RETVAL = parse_special_string(cmd, server, NULL, data, NULL, flags);
+OUTPUT:
+ RETVAL
+
+#*******************************
+MODULE = Irssi PACKAGE = Irssi::Windowitem
+#*******************************
+
+char *
+parse_special(item, cmd, data="", flags=0)
+ Irssi::Windowitem item
+ char *cmd
+ char *data
+ int flags
+CODE:
+ RETVAL = parse_special_string(cmd, item->server, item, data, NULL, flags);
+OUTPUT:
+ RETVAL
diff --git a/src/perl/common/module.h b/src/perl/common/module.h
index 11a60fe7..23cbad63 100644
--- a/src/perl/common/module.h
+++ b/src/perl/common/module.h
@@ -14,6 +14,7 @@
#include "ignore.h"
#include "settings.h"
#include "masks.h"
+#include "special-vars.h"
#include "chatnets.h"
#include "servers.h"