From fc5f8ba83e384098104e954a1aa3c9c77e9d89a7 Mon Sep 17 00:00:00 2001 From: Alexandre Pion Date: Tue, 14 Feb 2023 13:54:41 +0100 Subject: [PATCH 1/3] Display Zonemaster-LDNS and libldns version --- lib/Zonemaster/CLI.pm | 2 ++ 1 file changed, 2 insertions(+) diff --git a/lib/Zonemaster/CLI.pm b/lib/Zonemaster/CLI.pm index 6caba817..c118e22a 100755 --- a/lib/Zonemaster/CLI.pm +++ b/lib/Zonemaster/CLI.pm @@ -671,6 +671,8 @@ sub add_fake_ds { sub print_versions { say 'CLI version: ' . __PACKAGE__->VERSION; say 'Engine version: ' . $Zonemaster::Engine::VERSION; + say 'LDNS version: ' . $Zonemaster::LDNS::VERSION; + say 'libldns version: ' . Zonemaster::LDNS::lib_version(); say "\nTest module versions:"; my %methods = Zonemaster::Engine->all_methods; From 17bb153fc9ad9f4804ef0d73d206c26a499e958a Mon Sep 17 00:00:00 2001 From: Alexandre Pion Date: Wed, 15 Feb 2023 09:04:20 +0100 Subject: [PATCH 2/3] Remove unecessary module versions --- lib/Zonemaster/CLI.pm | 7 ------- 1 file changed, 7 deletions(-) diff --git a/lib/Zonemaster/CLI.pm b/lib/Zonemaster/CLI.pm index c118e22a..e86b40df 100755 --- a/lib/Zonemaster/CLI.pm +++ b/lib/Zonemaster/CLI.pm @@ -673,13 +673,6 @@ sub print_versions { say 'Engine version: ' . $Zonemaster::Engine::VERSION; say 'LDNS version: ' . $Zonemaster::LDNS::VERSION; say 'libldns version: ' . Zonemaster::LDNS::lib_version(); - say "\nTest module versions:"; - - my %methods = Zonemaster::Engine->all_methods; - foreach my $module ( sort keys %methods ) { - my $mod = "Zonemaster::Engine::Test::$module"; - say "\t$module: " . $mod->version; - } return; } From 17e3db78d2c9686cd0fad794b05d5661b8b65c94 Mon Sep 17 00:00:00 2001 From: Alexandre Pion Date: Wed, 15 Feb 2023 09:05:30 +0100 Subject: [PATCH 3/3] Display full component names --- lib/Zonemaster/CLI.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/lib/Zonemaster/CLI.pm b/lib/Zonemaster/CLI.pm index e86b40df..e30a33a8 100755 --- a/lib/Zonemaster/CLI.pm +++ b/lib/Zonemaster/CLI.pm @@ -669,10 +669,10 @@ sub add_fake_ds { } sub print_versions { - say 'CLI version: ' . __PACKAGE__->VERSION; - say 'Engine version: ' . $Zonemaster::Engine::VERSION; - say 'LDNS version: ' . $Zonemaster::LDNS::VERSION; - say 'libldns version: ' . Zonemaster::LDNS::lib_version(); + say 'Zonemaster-CLI version ' . __PACKAGE__->VERSION; + say 'Zonemaster-Engine version ' . $Zonemaster::Engine::VERSION; + say 'Zonemaster-LDNS version ' . $Zonemaster::LDNS::VERSION; + say 'NL NetLabs LDNS version ' . Zonemaster::LDNS::lib_version(); return; }