#!/usr/bin/perl # kernel-desktop-latest request latest kernel-desktop-foobar # use strict; use lib '.', 't'; use helper; use urpm::cfg; use urpm::orphans; use Test::More 'no_plan'; need_root_and_prepare(); my $arch = urpm::cfg::get_arch(); my $name = 'kernel'; my $medium = 'i586-to-i686'; urpmi_addmedia("$medium $::pwd/media/rpm-i586-to-i686/"); urpmi("--media $medium --auto libfoobar-1-1.i586"); check_installed_names('libfoobar'); urpmi("--media $medium --auto libfoobar-1-1.i686"); is(`rpm -q --qf '%{NVRA}' --root $::pwd/root libfoobar`, 'libfoobar-1-1.i686', 'i686 pkgs is installed (aka upgraded)'); check_installed_and_remove('libfoobar');