diff options
| -rw-r--r-- | Rpmdrake/pkg.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Rpmdrake/pkg.pm b/Rpmdrake/pkg.pm index f4956bce..68aa79cc 100644 --- a/Rpmdrake/pkg.pm +++ b/Rpmdrake/pkg.pm @@ -111,7 +111,8 @@ sub extract_header { $name =~ s!\.src!!; if ($p->flag_installed && !$p->flag_upgrade) { - add2hash($pkg, { files => [ split /\n/, chomp_(to_utf8(scalar(run_rpm("rpm -ql $name")))) || N("(none)") ], + my @files = map { chomp_(to_utf8($_)) } run_rpm("rpm -ql rpm"); + add2hash($pkg, { files => [ @files ? @files : N("(none)") ], changelog => $chg_prepro->(to_utf8(scalar(run_rpm("rpm -q --changelog $name")))) }); } else { my $medium = pkg2medium($p, $urpm); |