From 9cd3ccffd5372dfde3af478e3f832f18db4be3f1 Mon Sep 17 00:00:00 2001
From: Paul Buetow <paul@buetow.org>
Date: Sat, 6 Apr 2013 13:14:41 +0200
Subject: tagging tags

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

(limited to 'yhttpd-0.7.2/scripts/buildnr.pl')

diff --git a/yhttpd-0.7.2/scripts/buildnr.pl b/yhttpd-0.7.2/scripts/buildnr.pl
new file mode 100755
index 0000000..edfffd6
--- /dev/null
+++ b/yhttpd-0.7.2/scripts/buildnr.pl
@@ -0,0 +1,26 @@
+#!/usr/bin/perl
+
+# The yhttpd Project (2003)
+#
+# This script increases the BUILNR of msgs,h each time the yhttpd
+# 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