summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorTimo Sirainen <cras@irssi.org>2001-12-07 21:52:41 +0000
committercras <cras@dbcabf3a-b0e7-0310-adc4-f8d773084564>2001-12-07 21:52:41 +0000
commita09075938fc9fce04805b291426e4ae635a6cc87 (patch)
tree6ce1543c3b3ebbf83e953200bcf34c4a48e6be50
parent9a44941ca444f7513e05c43a8b02355311a536b9 (diff)
downloadirssi-a09075938fc9fce04805b291426e4ae635a6cc87.zip
Added Irssi::require_version()
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2216 dbcabf3a-b0e7-0310-adc4-f8d773084564
-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
#*******************************