add version header

git-svn-id: http://svn2.nishi.boats/svn/milsko/trunk@428 b9cfdab3-6d41-4d17-bbe4-086880011989
This commit is contained in:
NishiOwO
2025-10-20 08:33:21 +00:00
parent f1d7fe87bb
commit 768bb7327b
6 changed files with 48 additions and 14 deletions

View File

@@ -2,11 +2,11 @@
# $Id$
open(IN, "<", $ARGV[0]);
while(my $l = <IN>){
$l =~ s/\r?\n$//g;
$l =~ s/%([^ ]+)/@\1/g;
if(!($l =~ /\@prop /)){
print("$l\n");
}
while (my $l = <IN>) {
$l =~ s/\r?\n$//g;
$l =~ s/%([^ ]+)/@\1/g;
if (!($l =~ /\@prop /)) {
print("$l\n");
}
}
close(IN);

View File

@@ -39,10 +39,19 @@ sub h {
print(OUT "\n");
}
open(IN, "<", "include/Mw/Version.h");
my @lines = <IN>;
close(IN);
my @match = grep(/MwVERSION/, @lines);
my $ver = $match[0];
$ver =~ /\"([^"]+)\"/;
$ver = $1;
open(OUT, ">", "README.txt");
l("");
l("Greetings - Welcome to the Milsko GUI Toolkit (Version 1.0)");
l("Greetings - Welcome to the Milsko GUI Toolkit (Version " . $ver . ")");
l("");
l(
" This document contains a brief summary of the contents of this source distributions and building instructions for Milsko GUI Toolkit."