From aa496190ba5dc1b0fdb79a6b8c53b382c0710d9f Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 21 Sep 2007 15:33:05 +0000 Subject: add an old .src.rpm in the test. it fails --- t/superuser--media_info_dir.t | 12 ++++++++++++ 1 file changed, 12 insertions(+) (limited to 't/superuser--media_info_dir.t') diff --git a/t/superuser--media_info_dir.t b/t/superuser--media_info_dir.t index 2f233ee9..6ce19af9 100644 --- a/t/superuser--media_info_dir.t +++ b/t/superuser--media_info_dir.t @@ -37,4 +37,16 @@ sub rpm_v3 { is(`rpm -qa --root $::pwd/root`, ''); urpmi_removemedia($medium_name); } + + foreach my $src_rpm (glob('media/rpm-v3/*.rpm')) { + my ($wanted_arch) = $src_rpm =~ /(\w+)\.rpm$/; + my $cmd = urpm_cmd('urpmq') . " -f $src_rpm"; + warn "# $cmd\n"; + chomp(my $fullname = `$cmd`); + my ($arch) = $fullname =~ /(\w+)$/; + + $wanted_arch = 'i386' if $src_rpm =~ /KBackup/; # ERROR: package has a Sourcerpm empty tag (#29809) + + is($arch, $wanted_arch, "$fullname should have arch $wanted_arch (found $arch)"); + } } -- cgit v1.2.1