From: Dirk Koopman <djk@tobit.co.uk>
Date: Tue, 14 Oct 2014 20:00:22 +0000 (+0100)
Subject: remove --long from git describe call
X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=c719f7d042e1cc5af74d4c19fc2563de6df7269a;p=spider.git

remove --long from git describe call
---

diff --git a/perl/Version.pm b/perl/Version.pm
index e43ab22c..83b8c106 100644
--- a/perl/Version.pm
+++ b/perl/Version.pm
@@ -11,7 +11,7 @@ use vars qw($version $subversion $build $gitversion);
 
 $version = '1.55';
 $subversion = '0';
-$build = '161';
-$gitversion = '7a39506[i]';
+$build = '162';
+$gitversion = 'c664bf7[i]';
 
 1;
diff --git a/perl/cluster.pl b/perl/cluster.pl
index 81e23cf8..3b931a0f 100755
--- a/perl/cluster.pl
+++ b/perl/cluster.pl
@@ -387,7 +387,7 @@ if (DXSql::init($dsn)) {
 		# determine the real version number
 		my $repo = Git->repository(Directory => "$root/.git");
 		if ($repo) {
-			my $desc = $repo->command_oneline(['describe', '--long'], STDERR => 0);
+			my $desc = $repo->command_oneline(['describe'], STDERR => 0);
 			if ($desc) {
 				my ($v, $s, $b, $g) = $desc =~ /^([\d.]+)(?:\.(\d+))?-(\d+)-g([0-9a-f]+)/;
 				$version = $v;