From: urs Date: Tue, 12 Jun 2007 19:39:50 +0000 (+0000) Subject: Correctly record newlines for multi-line settings X-Git-Tag: DEBIAN_metainit_0_0_1~82 X-Git-Url: http://git.nomeata.de/?p=darcs-mirror-metainit.git;a=commitdiff_plain;h=9c1e5bc460677c326a5167b2a2408701e08e62bb Correctly record newlines for multi-line settings --- diff --git a/Parse.pm b/Parse.pm index 359ec1f..325c623 100644 --- a/Parse.pm +++ b/Parse.pm @@ -15,9 +15,10 @@ sub parse { $lastkey = $key; } elsif ($lastkey) { + chomp; s/^ //; s/^\.$//; - $parsed{$lastkey} .= $_; + $parsed{$lastkey} .= "\n$_"; } else { die "Cannot parse $!"; }