Fix version parsing for real, cut 3.10.0_2

This commit is contained in:
Sandro Jäckel 2022-05-16 02:07:49 +02:00
parent ca4ce91497
commit 4201bf3b03
No known key found for this signature in database
GPG key ID: 3AF5A43A3EECC2E5
3 changed files with 5 additions and 5 deletions

View file

@ -1,4 +1,4 @@
# DDCLIENT v3.10.0rc1 # DDCLIENT v3.10.0
`ddclient` is a Perl client used to update dynamic DNS entries for accounts `ddclient` is a Perl client used to update dynamic DNS entries for accounts
on many dynamic DNS services. on many dynamic DNS services.
@ -77,8 +77,8 @@ ddclient package.
the directory: the directory:
```shell ```shell
tar xvfa ddclient-3.10.0rc1.tar.gz tar xvfa ddclient-3.10.0.tar.gz
cd ddclient-3.10.0rc1 cd ddclient-3.10.0
``` ```
(If you are installing from a clone of the Git repository, you (If you are installing from a clone of the Git repository, you

View file

@ -1,5 +1,5 @@
AC_PREREQ([2.63]) AC_PREREQ([2.63])
AC_INIT([ddclient], [3.10.0rc1]) AC_INIT([ddclient], [3.10.0_2])
AC_CONFIG_SRCDIR([ddclient.in]) AC_CONFIG_SRCDIR([ddclient.in])
AC_CONFIG_AUX_DIR([build-aux]) AC_CONFIG_AUX_DIR([build-aux])
AC_CONFIG_MACRO_DIR([m4]) AC_CONFIG_MACRO_DIR([m4])

View file

@ -30,7 +30,7 @@ use IO::Socket::INET;
use Socket qw(AF_INET AF_INET6 PF_INET PF_INET6); use Socket qw(AF_INET AF_INET6 PF_INET PF_INET6);
use Sys::Hostname; use Sys::Hostname;
use version 0.77; our $VERSION = version->declare('v3.10.0'); use version 0.77; our $VERSION = version->declare('v3.10.0_2');
(my $version = $VERSION->stringify()) =~ s/^v//; (my $version = $VERSION->stringify()) =~ s/^v//;
my $programd = $0; my $programd = $0;
$programd =~ s%^.*/%%; $programd =~ s%^.*/%%;