From 0ff68bc2ce17ed97d22575c250c1d569638c1801 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 23 Sep 2008 15:35:42 +0000 Subject: test reconfig.urpmi --- t/02create_pkgs.t | 3 +++ t/data/reconfig.urpmi | 2 ++ t/superuser--addmedia.t | 9 +++++++++ 3 files changed, 14 insertions(+) create mode 100644 t/data/reconfig.urpmi diff --git a/t/02create_pkgs.t b/t/02create_pkgs.t index 3a333686..fc1fd341 100644 --- a/t/02create_pkgs.t +++ b/t/02create_pkgs.t @@ -50,6 +50,9 @@ foreach my $spec (glob("data/SPECS/srpm*.spec")) { genhdlist_std($name); } +mkdir 'media/reconfig'; +system_("cp -r data/reconfig.urpmi media/reconfig"); + mkdir 'media/media_info'; system_("cp -r data/media.cfg media/media_info"); system_('gendistrib -s .'); diff --git a/t/data/reconfig.urpmi b/t/data/reconfig.urpmi new file mode 100644 index 00000000..32251f83 --- /dev/null +++ b/t/data/reconfig.urpmi @@ -0,0 +1,2 @@ +# this is an urpmi reconfiguration file +/reconfig /various diff --git a/t/superuser--addmedia.t b/t/superuser--addmedia.t index 30d7fdda..1c1c41b2 100644 --- a/t/superuser--addmedia.t +++ b/t/superuser--addmedia.t @@ -15,6 +15,8 @@ my @names = ($name, $name2, $name3, 'bis'); my @fields = qw(hdlist synthesis with_synthesis media_info_dir no-media-info list virtual ignore); +test_reconfig(); + try_media_d_1(); try_media_d_2(); @@ -165,3 +167,10 @@ sub try_media_d_2 { ok(unlink media_d_cfg($name)); } + +sub test_reconfig { + urpmi_addmedia("reconfig $::pwd/media/reconfig"); + check_conf({ name => 'reconfig', url => "$::pwd/media/$name" }); + check_urpmi($name); + urpmi_removemedia('-a'); +} -- cgit v1.2.1