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 | ||
