use lib qw(..);
+use Test::MockModule;
use Test::More;
+use Test::MockModule;
use File::Basename;
my $INPUT_DIR = './restore-config-input';
my $EXPECTED_DIR = './restore-config-expected';
+my $pve_cluster_module = Test::MockModule->new('PVE::Cluster');
+$pve_cluster_module->mock(
+ cfs_read_file => sub {
+ return {};
+ },
+);
+
# NOTE update when you add/remove tests
plan tests => 4;
+my $cfs_mock = Test::MockModule->new("PVE::Cluster");
+$cfs_mock->mock(
+ cfs_read_file => sub {
+ my ($file) = @_;
+
+ if ($file eq 'datacenter.cfg') {
+ return {};
+ } else {
+ die "'cfs_read_file' called - missing mock?\n";
+ }
+ },
+);
+
dir_glob_foreach('./restore-config-input', '[0-9]+.conf', sub {
my ($file) = @_;