Show the package name for arch incompatible warning
authorZhang Qiang <qiang.z.zhang@intel.com>
Tue, 25 Dec 2012 04:58:56 +0000 (12:58 +0800)
committerZhang Qiang <qiang.z.zhang@intel.com>
Tue, 25 Dec 2012 04:58:56 +0000 (12:58 +0800)
Change-Id: I26fe9e4e33d42debbeafb630dcc84b44391fcb78

depanneur

index 530b0fd..0f181f6 100755 (executable)
--- a/depanneur
+++ b/depanneur
@@ -641,7 +641,7 @@ sub parse_packs {
         }
         my $pack = Build::Rpm::parse($config, $spec);
         if ( ( $pack->{'exclarch'} ) &&  ( ! grep $_ eq $archs[0], @{$pack->{'exclarch'}} ) ) {
-            warning("build arch not compatible: " . join(" ", @{$pack->{'exclarch'}}));
+            warning($pack->{name} . ": build arch not compatible: " . join(" ", @{$pack->{'exclarch'}}));
             next;
         }
         my $name = $pack->{name};