fix tests: stop peeking and use Node's API

dod38fr · Jul 9, 2012 · 2ec4b04 · 2ec4b04
1 parent d754e11
commit 2ec4b04
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/t/augeas_backend.t b/t/augeas_backend.t
@@ -109,7 +109,7 @@ is_deeply([<AUG>],\@expect,"check content of $aug_file") ;
 close AUG;
 
 # check directly the content of augeas
-my $augeas_obj = $i_root->{bmgr}->get_backend('augeas')->_augeas_object ;
+my $augeas_obj = $i_root->backend_mgr->get_backend('augeas')->_augeas_object ;
 
 my $nb = $augeas_obj -> count_match("/files/etc/hosts/*") ;
 is($nb,4,"Check nb of hosts in Augeas") ;
@@ -160,7 +160,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->{bmgr}->get_backend('augeas')->_augeas_object ;
+my $ssh_augeas_obj = $sshd_root->backend_mgr->get_backend('augeas')->_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
@@ -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->{bmgr}->get_backend('augeas')->_augeas_object ;
+my $ssh_augeas_obj = $sshd_root->backend_mgr->get_backend('augeas')->_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/*") ;