X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fcluster.pl;h=e13fb03493dea1093bb0c1e2844005fad9ed7078;hb=dd902a3e23aeb207178d9960f17b757262842ed6;hp=3e57deb6dca15f9acebf0bd847f96228a88dbb8a;hpb=677f9d4ae7355cb6e5d05c3782a39e9022647f5b;p=spider.git

diff --git a/perl/cluster.pl b/perl/cluster.pl
index 3e57deb6..e13fb034 100755
--- a/perl/cluster.pl
+++ b/perl/cluster.pl
@@ -513,8 +513,8 @@ sub setup_start
 				if ($desc) {
 					my ($v, $s, $b, $g) = $desc =~ /^([\d.]+)(?:\.(\d+))?-(\d+)-g([0-9a-f]+)/;
 					$s ||= '';
-					dbg("Git: $desc");
-					dbg("Git: V=$v S=$s B=$b g=$g");
+					dbg("Git: $desc") if isdbg('git');
+					dbg("Git: V=$v S=$s B=$b g=$g") if isdbg('git');
 					$version = $v;
 					$build = $b || 0;
 					$gitversion = "$g\[r]";