diff options
Diffstat (limited to 'Rpmdrake/pkg.pm')
-rw-r--r-- | Rpmdrake/pkg.pm | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/Rpmdrake/pkg.pm b/Rpmdrake/pkg.pm index 7b0da077..b97af7d7 100644 --- a/Rpmdrake/pkg.pm +++ b/Rpmdrake/pkg.pm @@ -84,6 +84,12 @@ sub extract_header { return if $pkg->{$fields{$xml_info}}; my $p = $pkg->{pkg}; + + if (!$p) { + warn ">> ghost package '$pkg' has no URPM object!!!\n"; + return; + } + my $name = urpm_name($p); # fix extracting info for SRPMS and RPM GPG keys: $name =~ s!\.src!!; |