From 617f302808d24fa11fab49b21b71fe644ca7b053 Mon Sep 17 00:00:00 2001
From: Arseny Kapoulkine <arseny.kapoulkine@gmail.com>
Date: Sat, 17 Jan 2015 18:39:29 -0800
Subject: [PATCH] tests: Use Git instead of Subversion in autotest

---
 tests/autotest-local.pl       | 4 ++--
 tests/autotest-remote-host.pl | 2 +-
 tests/autotest-report.pl      | 4 ++--
 3 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/tests/autotest-local.pl b/tests/autotest-local.pl
index a419bb0..60f8b20 100644
--- a/tests/autotest-local.pl
+++ b/tests/autotest-local.pl
@@ -65,8 +65,8 @@ if ($fast)
 
 print "### autotest begin " . scalar localtime() . "\n";
 
-# print SVN revision info
-print "### autotest revision $1\n" if (`svn info` =~ /Revision:\s+(\d+)/);
+# print Git revision info
+print "### autotest revision $1\n" if (`git rev-parse HEAD` =~ /(.+)/);
 
 # get CPU info
 $cpucount = &getcpucount();
diff --git a/tests/autotest-remote-host.pl b/tests/autotest-remote-host.pl
index 5abef1e..63dfe68 100644
--- a/tests/autotest-remote-host.pl
+++ b/tests/autotest-remote-host.pl
@@ -32,6 +32,6 @@ exit unless $client;
 
 select $client;
 
-&execprint('svn up') == 0 || die "error updating from repo\n";
+&execprint('git pull') == 0 || die "error updating from repo\n";
 &execprint('perl tests/autotest-local.pl') == 0 || die "error launching tests\n";
 system($exitcmd);
diff --git a/tests/autotest-report.pl b/tests/autotest-report.pl
index b5ebd8c..9eebf39 100644
--- a/tests/autotest-report.pl
+++ b/tests/autotest-report.pl
@@ -128,7 +128,7 @@ while (<>)
 		$defines{$_} = 1 foreach (split /,/, $defineset);
 		&insertindex(\%configurations, $fullconf);
 	}
-	elsif (/^### autotest revision (\d+)/)
+	elsif (/^### autotest revision (.+)/)
 	{
 		if (defined $revision && $revision != $1)
 		{
@@ -224,6 +224,6 @@ $date = localtime;
 
 print <<END;
 </table><br>
-Generated on $date from Subversion r$revision
+Generated on $date from Git $revision
 </body></html>
 END