summaryrefslogtreecommitdiff
path: root/src/perl/common/Core.xs
diff options
context:
space:
mode:
Diffstat (limited to 'src/perl/common/Core.xs')
-rw-r--r--src/perl/common/Core.xs7
1 files changed, 7 insertions, 0 deletions
diff --git a/src/perl/common/Core.xs b/src/perl/common/Core.xs
index 723533d7..d1bcb67b 100644
--- a/src/perl/common/Core.xs
+++ b/src/perl/common/Core.xs
@@ -436,6 +436,13 @@ CODE:
OUTPUT:
RETVAL
+void
+require_version(date)
+ int date
+CODE:
+ if (date > atol(IRSSI_VERSION_DATE))
+ die("This script requires irssi version %d or later", date);
+
#*******************************
MODULE = Irssi::Core PACKAGE = Irssi::Server
#*******************************