diff options
author | Jonas Smedegaard <dr@jones.dk> | 2014-07-30 14:02:46 +0200 |
---|---|---|
committer | Jonas Smedegaard <dr@jones.dk> | 2014-07-30 16:10:24 +0200 |
commit | 6f85dac676ef4bb4871272cc2499cb321e32c302 (patch) | |
tree | d3d6a64ceeda391bb6bca5c6ca979b743febc66d /bin/pkglist2preseed | |
parent | f7ea0e336396a21bee6f16a33be14c8b798c512f (diff) |
Wrap tweaks.
Diffstat (limited to 'bin/pkglist2preseed')
-rwxr-xr-x | bin/pkglist2preseed | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/bin/pkglist2preseed b/bin/pkglist2preseed index b0d7902..0ff94c5 100755 --- a/bin/pkglist2preseed +++ b/bin/pkglist2preseed @@ -32,9 +32,9 @@ foreach (@tweakfiles) { grep { chomp } @tweaklines; grep { s/^[#]{1} (.*)/# * $1/ } @tweaklines; grep { s/^[#]{2} (.*)/# $1/ } @tweaklines; +grep { /^[^#]/ and s/(?<!;)$/ / } @tweaklines; $tweakdesc = join "\n", grep { /^[#] / } @tweaklines; -$tweaklist = join ";", grep { s/^(?!#)\s*(.+)/$1/ } @tweaklines; -$tweaklist .= ';'; +$tweaklist = join "\\\n", grep { /^[^#]/ } @tweaklines; my $pkglist = join( ' ', @pkg ); |