summaryrefslogtreecommitdiffstats
path: root/t/superuser--addmedia.t
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2008-09-23 11:09:56 +0000
committerPascal Rigaux <pixel@mandriva.com>2008-09-23 11:09:56 +0000
commit475d7c90cd7aa7b2d65e7bc88f53a03167c7471b (patch)
tree4c41273c55017a486379d0c5295a829a07de3dfa /t/superuser--addmedia.t
parentc5fa330037e4a0e0a9341b268672a4186a8e62a5 (diff)
downloadurpmi-475d7c90cd7aa7b2d65e7bc88f53a03167c7471b.tar
urpmi-475d7c90cd7aa7b2d65e7bc88f53a03167c7471b.tar.gz
urpmi-475d7c90cd7aa7b2d65e7bc88f53a03167c7471b.tar.bz2
urpmi-475d7c90cd7aa7b2d65e7bc88f53a03167c7471b.tar.xz
urpmi-475d7c90cd7aa7b2d65e7bc88f53a03167c7471b.zip
adapt to change:
r246037 | pixel | 2008-09-19 : do not skip "debug_for=" media
Diffstat (limited to 't/superuser--addmedia.t')
-rw-r--r--t/superuser--addmedia.t39
1 files changed, 16 insertions, 23 deletions
diff --git a/t/superuser--addmedia.t b/t/superuser--addmedia.t
index f6701a3e..30d7fdda 100644
--- a/t/superuser--addmedia.t
+++ b/t/superuser--addmedia.t
@@ -11,6 +11,7 @@ need_root_and_prepare();
my $name = 'various';
my $name2 = 'various2';
my $name3 = 'various3';
+my @names = ($name, $name2, $name3, 'bis');
my @fields = qw(hdlist synthesis with_synthesis media_info_dir no-media-info list virtual ignore);
@@ -50,21 +51,9 @@ try_distrib({},
'--probe-hdlist');
try_distrib({},
'--probe-synthesis');
-try_distrib_removable({
- with_synthesis => "../..//media/media_info/synthesis.hdlist_$name.cz",
- with_synthesis2 => "../..//media/media_info/synthesis.hdlist_$name2.cz",
- with_synthesis3 => "../..//media/media_info/synthesis.hdlist_$name3.cz" },
- '');
-try_distrib_removable({
- with_synthesis => "../..//media/media_info/synthesis.hdlist_$name.cz",
- with_synthesis2 => "../..//media/media_info/synthesis.hdlist_$name2.cz",
- with_synthesis3 => "../..//media/media_info/synthesis.hdlist_$name3.cz" },
- '--probe-hdlist');
-try_distrib_removable({
- with_synthesis => "../..//media/media_info/synthesis.hdlist_$name.cz",
- with_synthesis2 => "../..//media/media_info/synthesis.hdlist_$name2.cz",
- with_synthesis3 => "../..//media/media_info/synthesis.hdlist_$name3.cz" },
- '--probe-synthesis');
+try_distrib_removable({}, '');
+try_distrib_removable({}, '--probe-hdlist');
+try_distrib_removable({}, '--probe-synthesis');
try_use_distrib();
@@ -90,13 +79,17 @@ sub try_distrib {
sub try_distrib_removable {
my ($want, $options) = @_;
- my $want2 = { %$want, with_synthesis => $want->{with_synthesis2} || $want->{with_synthesis} };
- my $want3 = { %$want, with_synthesis => $want->{with_synthesis3} || $want->{with_synthesis}, ignore => 1 };
- try_distrib_removable_($want, $want2, $want3, $options);
+ my @want_list = map {
+ { %$want, with_synthesis => "../..//media/media_info/synthesis.hdlist_$_.cz" };
+ } @names;
+ $want_list[2]{ignore} = 1;
+ $want_list[3]{ignore} = 1;
+
+ try_distrib_removable_(\@want_list, $options);
- $want3->{virtual} = $want2->{virtual} = $want->{virtual} = 1;
- try_distrib_removable_($want, $want2, $want3, '--virtual ' . $options);
+ $_->{virtual} = 1 foreach @want_list;
+ try_distrib_removable_(\@want_list, '--virtual ' . $options);
}
sub try_medium_ {
@@ -118,7 +111,7 @@ sub try_distrib_ {
my ($want, $want3, $options) = @_;
urpmi_addmedia("--distrib $name $::pwd $options");
- check_conf($want, $want, $want3);
+ check_conf($want, $want, $want3, $want3);
check_urpmi($name, $name2);
urpmi_removemedia('-a');
}
@@ -129,10 +122,10 @@ sub try_use_distrib {
}
sub try_distrib_removable_ {
- my ($want, $want2, $want3, $options) = @_;
+ my ($want_list, $options) = @_;
urpmi_addmedia("--distrib $name $::pwd $options --use-copied-hdlist");
- check_conf($want, $want2, $want3);
+ check_conf(@$want_list);
check_urpmi($name, $name2);
urpmi_removemedia('-a');
}