$ENV{'LANG'} = "C";
my $svnversion = 0;
-my $present = 0;
my $clean = 2;
my @compiletime = gmtime();
if(open(SVNINFO, "svn info $main_dir|")) {
while(<SVNINFO>) {
if (/^Last Changed Rev: (.*)/) {
- $present = 1;
$svnversion = $1;
## last; # Do not abort here, since SVN tends to complain about a Broken pipe
}
while(<ENTRIES>) {
last if($i == 3 and !/^dir/);
if($i == 11 and /^([0-9]*)/) {
- $present = 1;
$svnversion = $1;
}
$i++;
const struct version_information __attribute__((section(".version_information"))) version_information = {
VERSION_INFORMATION_MAGIC,
1,
- $present,
+ 1,
$clean,
"svn $svnversion",
"$ctime",