[libconfig-model-backend-augeas-perl] 01/04: New upstream version 0.123

dod at debian.org dod at debian.org
Thu Jan 4 12:16:37 UTC 2018


This is an automated email from the git hooks/post-receive script.

dod pushed a commit to annotated tag debian/0.123-1
in repository libconfig-model-backend-augeas-perl.

commit 7a972ed434849b19d7cbcca6de28216cf41f35bb
Author: Dominique Dumont <dod at debian.org>
Date:   Sat Dec 30 17:18:29 2017 +0100

    New upstream version 0.123
---
 Build.PL                           | 1 +
 ChangeLog                          | 6 ++++++
 META.json                          | 5 +++--
 META.yml                           | 5 +++--
 lib/Config/Model/Backend/Augeas.pm | 2 +-
 t/augeas_backend.t                 | 4 ++--
 t/augeas_from_scratch.t            | 4 ++--
 7 files changed, 18 insertions(+), 9 deletions(-)

diff --git a/Build.PL b/Build.PL
index e87dec4..e72e476 100644
--- a/Build.PL
+++ b/Build.PL
@@ -40,6 +40,7 @@ my $build = Module::Build->new
 		      'Mouse'             => 0,
 		     },
    build_requires => {
+       'Config::Model'     => '2.116', # for BackendMgr::backend_obj
        'Config::Model::Itself' => '2.012', # for t/model_extension.t
        'Test::More'        => 0,
        'Test::Exception'   => 0,
diff --git a/ChangeLog b/ChangeLog
index f0026a8..75858b8 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2017-12-30  Dominique Dumont  <domi.dumont at free.fr> v0.123
+
+    * Build.PL: require Config::Model::Itself 2.116 for tests
+    * Fix broken tests following deprecation of multi-backends
+      in Config::Model
+
 2017-10-03  Dominique Dumont  <domi.dumont at free.fr> v0.122
 
     * Build.PL: require Config::Model::Itself 2.012 for tests
diff --git a/META.json b/META.json
index 552fd7b..5a04100 100644
--- a/META.json
+++ b/META.json
@@ -16,6 +16,7 @@
    "prereqs" : {
       "build" : {
          "requires" : {
+            "Config::Model" : "2.116",
             "Config::Model::Itself" : "2.012",
             "Test::Differences" : "0",
             "Test::Exception" : "0",
@@ -41,7 +42,7 @@
    "provides" : {
       "Config::Model::Backend::Augeas" : {
          "file" : "lib/Config/Model/Backend/Augeas.pm",
-         "version" : "0.122"
+         "version" : "0.123"
       }
    },
    "release_status" : "stable",
@@ -50,6 +51,6 @@
          "http://www.gnu.org/licenses/old-licenses/lgpl-2.1.txt"
       ]
    },
-   "version" : "0.122",
+   "version" : "0.123",
    "x_serialization_backend" : "JSON::PP version 2.27400_02"
 }
diff --git a/META.yml b/META.yml
index 15af550..298b65c 100644
--- a/META.yml
+++ b/META.yml
@@ -3,6 +3,7 @@ abstract: 'Read and write configuration data through Augeas'
 author:
   - 'Dominique Dumont (ddumont at cpan dot org)'
 build_requires:
+  Config::Model: '2.116'
   Config::Model::Itself: '2.012'
   Test::Differences: '0'
   Test::Exception: '0'
@@ -21,7 +22,7 @@ name: Config-Model-Backend-Augeas
 provides:
   Config::Model::Backend::Augeas:
     file: lib/Config/Model/Backend/Augeas.pm
-    version: '0.122'
+    version: '0.123'
 requires:
   Config::Augeas: '0.303'
   Config::Model: '2.111'
@@ -29,5 +30,5 @@ requires:
   Mouse: '0'
 resources:
   license: http://www.gnu.org/licenses/old-licenses/lgpl-2.1.txt
-version: '0.122'
+version: '0.123'
 x_serialization_backend: 'CPAN::Meta::YAML version 0.018'
diff --git a/lib/Config/Model/Backend/Augeas.pm b/lib/Config/Model/Backend/Augeas.pm
index 13b0e1b..f9c4d19 100644
--- a/lib/Config/Model/Backend/Augeas.pm
+++ b/lib/Config/Model/Backend/Augeas.pm
@@ -32,7 +32,7 @@ my $has_augeas = 1;
 eval { require Config::Augeas; };
 $has_augeas = 0 if $@;
 
-our $VERSION = '0.122';
+our $VERSION = '0.123';
 
 my $logger = get_logger('Backend::Augeas');
 
diff --git a/t/augeas_backend.t b/t/augeas_backend.t
index ea98bd5..20fd4bc 100644
--- a/t/augeas_backend.t
+++ b/t/augeas_backend.t
@@ -119,7 +119,7 @@ is_deeply([<AUG>],\@expect,"check content of $aug_file") ;
 close AUG;
 
 # check directly the content of augeas
-my $augeas_obj = $i_root->backend_mgr->get_backend('augeas')->_augeas_object ;
+my $augeas_obj = $i_root->backend_mgr->backend_obj->_augeas_object ;
 
 my $nb = $augeas_obj -> count_match("/files/etc/hosts/*") ;
 is($nb,4,"Check nb of hosts in Augeas") ;
@@ -170,7 +170,7 @@ close SSHD ;
 my $sshd_root = $i_sshd->config_root ;
 $sshd_root->init; # required by Config::Model 1.236
 
-my $ssh_augeas_obj = $sshd_root->backend_mgr->get_backend('augeas')->_augeas_object ;
+my $ssh_augeas_obj = $sshd_root->backend_mgr->backend_obj->_augeas_object ;
 
 $ssh_augeas_obj->print('/files/etc/ssh/sshd_config/*') if $trace;
 #my @aug_content = $ssh_augeas_obj->match("/files/etc/ssh/sshd_config/*") ;
diff --git a/t/augeas_from_scratch.t b/t/augeas_from_scratch.t
index deea5e1..6d0edb1 100644
--- a/t/augeas_from_scratch.t
+++ b/t/augeas_from_scratch.t
@@ -4,7 +4,7 @@
 
 use ExtUtils::testlib;
 use Test::More ;
-use Config::Model;
+use Config::Model 2.116;
 use File::Path;
 use File::Copy ;
 use version 0.77 ;
@@ -80,7 +80,7 @@ ok( $i_sshd, "Created instance for /etc/ssh/sshd_config" );
 my $sshd_root = $i_sshd->config_root ;
 $sshd_root->init ;
 
-my $ssh_augeas_obj = $sshd_root->backend_mgr->get_backend('augeas')->_augeas_object ;
+my $ssh_augeas_obj = $sshd_root->backend_mgr->backend_obj->_augeas_object ;
 
 $ssh_augeas_obj->print('/files/etc/ssh/sshd_config/*') if $trace;
 #my @aug_content = $ssh_augeas_obj->match("/files/etc/ssh/sshd_config/*") ;

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libconfig-model-backend-augeas-perl.git



More information about the Pkg-perl-cvs-commits mailing list