mirror of
https://gitea.nishi.boats/pyrite-dev/milsko
synced 2025-12-31 06:30:52 +00:00
add version header
git-svn-id: http://svn2.nishi.boats/svn/milsko/trunk@428 b9cfdab3-6d41-4d17-bbe4-086880011989
This commit is contained in:
@@ -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);
|
||||
|
||||
@@ -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."
|
||||
|
||||
Reference in New Issue
Block a user