X-Git-Url: http://git.zerfleddert.de/cgi-bin/gitweb.cgi/proxmark3-svn/blobdiff_plain/8a6aec16d8c21d3c57457e5ec00eb83f5242feba..ead7519327a9ff01030d381d388460d35612fbda:/tools/mkversion.pl diff --git a/tools/mkversion.pl b/tools/mkversion.pl index 1c4dfcd9..a3ec2f2b 100644 --- a/tools/mkversion.pl +++ b/tools/mkversion.pl @@ -4,8 +4,6 @@ # but this will, at least in theory, also work on Windows with our current compile environment. # -- Henryk Plötz 2009-09-28 -use strict; - my $main_dir = shift; # Clear environment locale so that svn will not use localized strings @@ -40,13 +38,14 @@ if(open(SVNINFO, "svn info $main_dir|")) { } } else { - # Strategy two: look for .svn/entries. The third line should be "dir", the fourth line should contain the current + # Strategy two: look for .svn/entries. The third line should be "dir", the fourth line should contain + # the currently checked out revision, the eleventh line should contain the last changed revision. # revision. if(open(ENTRIES, "$main_dir/.svn/entries")) { my $i = 1; while() { last if($i == 3 and !/^dir/); - if($i == 4 and /^([0-9]*)/) { + if($i == 11 and /^([0-9]*)/) { $present = 1; $svnversion = $1; }