hamradio/spider
1
0
Fork 0
mirror of git://scm.dxcluster.org/scm/spider synced 2024-09-21 07:47:10 +00:00
Code Issues Packages Projects Releases Wiki Activity

change version strings to include perl version

Browse Source
This commit is contained in:
Dirk Koopman 2021-12-12 21:22:00 +00:00
parent c42b114fbe
commit 069852202d
3 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
Changes
View File

@ -1,5 +1,6 @@
12Dec21======================================================================= 12Dec21=======================================================================
1. fix git describe et al AGAIN to cope with (very) old (2009) git versions. 1. fix git describe et al AGAIN to cope with (very) old (2009) git versions.
2. Change version strings to include perl version in use.
11Dec21======================================================================= 11Dec21=======================================================================
1. Removed dependency on perl Git package. 1. Removed dependency on perl Git package.
2. Fixed errors caused by change 1 (use git -C $root to force .git location). 2. Fixed errors caused by change 1 (use git -C $root to force .git location).

2
cmd/show/version.pl
View File

@ -23,7 +23,7 @@ if ($self->priv > 5 && @in) {
} else { } else {
my ($year) = (gmtime($main::systime))[5]; my ($year) = (gmtime($main::systime))[5];
$year += 1900; $year += 1900;
push @out, "DX Spider Cluster version $main::version (build $main::build git: $main::gitbranch/$main::gitversion) on \u$^O"; push @out, "DXSpider v$main::version (build $main::build git: $main::gitbranch/$main::gitversion) using perl $^V on \u$^O";
push @out, "Copyright (c) 1998-$year Dirk Koopman G1TLH"; push @out, "Copyright (c) 1998-$year Dirk Koopman G1TLH";
} }

4
perl/cluster.pl
View File

@ -319,7 +319,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");
dbgclose(); dbgclose();
Logclose(); Logclose();
@ -439,7 +439,7 @@ DXXml::init();
# banner # banner
my ($year) = (gmtime)[5]; my ($year) = (gmtime)[5];
$year += 1900; $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"); dbg("Copyright (c) 1998-$year Dirk Koopman G1TLH");
# load Prefixes # load Prefixes