metadata.pl: do not strip whitespaces from multiline data

SVN-Revision: 17827

diff --git a/scripts/metadata.pm b/scripts/metadata.pm
index 65ba0b890d05e8834cc1c9af205a4fec9585ec1e..dd62b4c04abfe8957f2077bf99b9a56d6e1139b3 100644 (file)
--- a/scripts/metadata.pm
+++ b/scripts/metadata.pm
@@ -16,7 +16,6 @@ sub get_multiline {
        my $str;
        while (<$fh>) {
                last if /^@@/;
-               s/^\s*//g;
                $str .= (($_ and $prefix) ? $prefix . $_ : $_);
        }