diff options
| -rw-r--r-- | Rpmdrake/pkg.pm | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/Rpmdrake/pkg.pm b/Rpmdrake/pkg.pm index ed46174a..f4956bce 100644 --- a/Rpmdrake/pkg.pm +++ b/Rpmdrake/pkg.pm @@ -97,6 +97,14 @@ sub extract_header { #- preprocess changelog for faster TextView insert reaction [ map { [ "$spacing$_\n", if_(/^\*/, { 'weight' => Gtk2::Pango->PANGO_WEIGHT_BOLD }) ] } split("\n", $_[0]) ]; }; + my %fields = ( + info => 'description', + files => 'files', + changelog => 'changelog', + ); + # already extracted: + return if $pkg->{$fields{$xml_info}}; + my $p = $pkg->{pkg}; my $name = urpm_name($p); # fix extracting info for SRPMS and RPM GPG keys: |