From b891420946d5269cc326d67555c6aab3db41a01a Mon Sep 17 00:00:00 2001 From: Paul Buetow Date: Sun, 21 Nov 2010 17:01:59 +0000 Subject: added yhttpd and ycurses trunk versions --- ycurses/scripts/buildnr.pl | 26 ++++++++++++++++++++++++++ 1 file changed, 26 insertions(+) create mode 100755 ycurses/scripts/buildnr.pl (limited to 'ycurses/scripts/buildnr.pl') diff --git a/ycurses/scripts/buildnr.pl b/ycurses/scripts/buildnr.pl new file mode 100755 index 0000000..7867787 --- /dev/null +++ b/ycurses/scripts/buildnr.pl @@ -0,0 +1,26 @@ +#!/usr/bin/perl + +# The ycurses Project (2003) +# +# This script increases the BUILNR of src/msgs.h each time the ycurses +# gets recompiled! + +use strict; + +open MSGS, "src/msgs.h"; +my @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