From c3df5e0f2d48dadc17a44c966b85361cbb53b3a8 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 1 Dec 2006 10:35:30 +0000 Subject: add some *old* pkgs (from redhat 4.0) to test rpm&URPM handle it correctly so that bug #27263 won't happen again :) --- t/02create_pkgs.t | 17 +++++++++++++---- 1 file changed, 13 insertions(+), 4 deletions(-) (limited to 't/02create_pkgs.t') diff --git a/t/02create_pkgs.t b/t/02create_pkgs.t index ff6dabba..ff4fda0c 100644 --- a/t/02create_pkgs.t +++ b/t/02create_pkgs.t @@ -6,7 +6,7 @@ use Test::More 'no_plan'; chdir 't' if -d 't'; system('rm -rf BUILD RPMS media'); -for (qw(media BUILD RPMS RPMS/noarch)) { +foreach (qw(media BUILD RPMS RPMS/noarch)) { mkdir $_; } # locally build a test rpms @@ -17,14 +17,23 @@ foreach my $spec (glob("SPECS/*.spec")) { system_("mv RPMS/*/*.rpm media/$name"); if ($name eq 'various') { - system_("cp -r media/various media/various_nohdlist"); - system_("cp -r media/various media/various_no_subdir"); - system_("genhdlist --dest media/various_no_subdir"); + system_("cp -r media/$name media/${name}_nohdlist"); + system_("cp -r media/$name media/${name}_no_subdir"); + system_("genhdlist --dest media/${name}_no_subdir"); } system_("genhdlist --subdir media/$name/media_info media/$name"); } +{ + my $name = 'rpm-v3'; + system_("cp -r $name media"); + system_("cp -r media/$name media/${name}_nohdlist"); + system_("cp -r media/$name media/${name}_no_subdir"); + system_("genhdlist --dest media/${name}_no_subdir"); + system_("genhdlist --subdir media/$name/media_info media/$name"); +} + sub system_ { my ($cmd) = @_; system($cmd); -- cgit v1.2.1