From 19f9940dc968afae01b54377ee23ec59069c9646 Mon Sep 17 00:00:00 2001
From: Paul Buetow <paul@buetow.org>
Date: Tue, 27 Jan 2009 23:25:11 +0000
Subject:

---
 0.8/scripts/buildnr.pl | 26 ++++++++++++++++++++++++++
 1 file changed, 26 insertions(+)
 create mode 100755 0.8/scripts/buildnr.pl

(limited to '0.8/scripts/buildnr.pl')

diff --git a/0.8/scripts/buildnr.pl b/0.8/scripts/buildnr.pl
new file mode 100755
index 0000000..ee3d3e2
--- /dev/null
+++ b/0.8/scripts/buildnr.pl
@@ -0,0 +1,26 @@
+#!/usr/bin/perl
+
+# The yChat Project (2003)
+#
+# This script increases the BUILNR of msgs,h each time the yChat
+# gets recompiled!
+
+use strict;
+
+open MSGS, "src/msgs.h";
+my @msgs = <MSGS>;
+close MSGS;
+
+foreach (@msgs)
+{
+ if ( /define BUILDNR/ )
+ {
+  s/(BUILDNR )(.+)$/$1.($2+1)/e;
+  print;
+  next;
+ }
+}
+
+open MSGS, ">src/msgs.h";
+print MSGS @msgs;
+close MSGS;
-- 
cgit v1.2.3