diff options
| -rw-r--r-- | perl-install/raid.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/raid.pm b/perl-install/raid.pm index 1cc1720be..55c542e31 100644 --- a/perl-install/raid.pm +++ b/perl-install/raid.pm @@ -103,6 +103,7 @@ sub update { sub write { my ($raids, $file) = @_; + return if $::testing; local $\ = "\n"; local *F; open F, ">$file" or die N("Can't write file %s", $file); |