projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Git and Version string changes
[spider.git]
/
perl
/
cluster.pl
diff --git
a/perl/cluster.pl
b/perl/cluster.pl
index c04f1dbdc4ec4848902b4525422a0ea4b33d52d0..919c59db4278b0fc586db283202dc14c5aa65c41 100755
(executable)
--- a/
perl/cluster.pl
+++ b/
perl/cluster.pl
@@
-428,7
+428,7
@@
sub cease
$l->close_server;
}
$l->close_server;
}
- LogDbg('cluster', "DXSpider
V$version, build $build (git: $gitbranch/$gitversion)
on $^O ended");
+ LogDbg('cluster', "DXSpider
v$version build $build (git: $gitbranch/$gitversion) using perl $^V
on $^O ended");
dbg("bye bye everyone - bye bye");
dbgclose();
Logclose();
dbg("bye bye everyone - bye bye");
dbgclose();
Logclose();
@@
-522,7
+522,7
@@
sub setup_start
# determine the real Git build number and branch
my $desc;
# determine the real Git build number and branch
my $desc;
- eval {$desc = `git -
C $roo
t describe --long`};
+ eval {$desc = `git -
-git-dir=$root/.gi
t describe --long`};
if (!$@ && $desc) {
my ($v, $s, $b, $g) = $desc =~ /^([\d\.]+)(?:\.(\d+))?-(\d+)-g([0-9a-f]+)/;
$version = $v;
if (!$@ && $desc) {
my ($v, $s, $b, $g) = $desc =~ /^([\d\.]+)(?:\.(\d+))?-(\d+)-g([0-9a-f]+)/;
$version = $v;
@@
-532,8
+532,8
@@
sub setup_start
}
if (!$@) {
my @branch;
}
if (!$@) {
my @branch;
-
- eval {@branch = `git -
C $roo
t branch`};
+
+ eval {@branch = `git -
-git-dir=$root/.gi
t branch`};
unless ($@) {
for (@branch) {
my ($star, $b) = split /\s+/;
unless ($@) {
for (@branch) {
my ($star, $b) = split /\s+/;
@@
-560,7
+560,7
@@
sub setup_start
# banner
my ($year) = (gmtime)[5];
$year += 1900;
# banner
my ($year) = (gmtime)[5];
$year += 1900;
- LogDbg('cluster', "DXSpider
V$version, build $build (git: $gitbranch/$gitversion)
on $^O started");
+ LogDbg('cluster', "DXSpider
v$version build $build (git: $gitbranch/$gitversion) using perl $^V
on $^O started");
dbg("Copyright (c) 1998-$year Dirk Koopman G1TLH");
# load Prefixes
dbg("Copyright (c) 1998-$year Dirk Koopman G1TLH");
# load Prefixes