diff options
-rw-r--r-- | NPTest.pm | 5 |
1 files changed, 4 insertions, 1 deletions
@@ -462,7 +462,10 @@ sub SaveCache | |||
462 | $dataDumper->Terse(1); | 462 | $dataDumper->Terse(1); |
463 | $dataDumper->Sortkeys(1); | 463 | $dataDumper->Sortkeys(1); |
464 | 464 | ||
465 | print $fileHandle $dataDumper->Dump(); | 465 | my $data = $dataDumper->Dump(); |
466 | $data =~ s/^\s+/ /gmx; # make sure all systems use same amount of whitespace | ||
467 | $data =~ s/^\s+}/}/gmx; | ||
468 | print $fileHandle $data; | ||
466 | 469 | ||
467 | $fileHandle->close(); | 470 | $fileHandle->close(); |
468 | 471 | ||