fix file list in remove mode inserting one void line too much after itself

1 files changed, 2 insertions, 1 deletions

diff --git a/rpmdrake b/rpmdrake
index d6eab5bc..4ea68a3c 100755
--- a/rpmdrake
+++ b/rpmdrake
@@ -128,7 +128,8 @@ sub extract_header {
     if ($MODE eq 'remove') {
 	@$max_info_in_descr or return;
 	my $name = my_fullname($pkg->{pkg});
-	add2hash($pkg, { files => scalar(`rpm -ql $name`) || N("(none)"), changelog => $chg_prepro->(scalar(`LC_ALL=C rpm -q --changelog $name`)) });
+	add2hash($pkg, { files => chomp_(scalar(`rpm -ql $name`)) || N("(none)"),
+                         changelog => $chg_prepro->(scalar(`LC_ALL=C rpm -q --changelog $name`)) });
     } else {
 	my ($headersdir, $p, $medium) = ('/root/tmp/headers/', $pkg->{pkg}, pkg2medium($pkg->{pkg}, $urpm));
 	my $hdlist =  "$urpm->{statedir}/$medium->{hdlist}";