type => 'dir',
shared => 0,
},
+ 'btrfs-store' => {
+ content => {
+ images => 1,
+ },
+ path => '/butter/bread',
+ type => 'btrfs',
+ },
'cifs-store' => {
shared => 1,
path => '/mnt/pve/cifs-store',
my $ha = IO::Handle->new_from_fd($wa, 'w');
my $hb = IO::Handle->new_from_fd($wb, 'w');
- open my $diffproc, '-|', 'diff', '-up', "/proc/self/fd/$ra", "/proc/self/fd/$rb"
+ open my $diffproc, '-|', 'diff', '-up', "/proc/self/fd/$ra", "/proc/self/fd/$rb" ## no critic
or die "failed to run program 'diff': $!";
POSIX::close($ra);
POSIX::close($rb);
if (my $file = shift) {
do_test $file;
} else {
- foreach my $file (<cfg2cmd/*.conf>) {
+ while (my $file = <cfg2cmd/*.conf>) {
do_test $file;
}
}