From 0f9a26d4d5c78b9e44e0062a41ce0448bcb1f953 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Tue, 4 Aug 2015 04:20:46 -0400
Subject: introduce new helper func

needed for next commits
---
 t/superuser--failing-scriptlets.t | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 't')

diff --git a/t/superuser--failing-scriptlets.t b/t/superuser--failing-scriptlets.t
index 9d8a5929..be838c7b 100644
--- a/t/superuser--failing-scriptlets.t
+++ b/t/superuser--failing-scriptlets.t
@@ -30,6 +30,11 @@ sub test_install_rpm {
     system_("rpm --root $::pwd/root -i media/$medium_name/$name-*.rpm");
     check_installed_fullnames_and_remove("$name-1-1");
 }
+sub test_install_rpm_no_remove {
+    my ($name) = @_;
+    system_("rpm --root $::pwd/root -i media/$medium_name/$name-*.rpm");
+    check_installed_fullnames("$name-1-1");
+}
 sub test_install_rpm_fail {
     my ($name) = @_;
     system_should_fail("rpm --root $::pwd/root -i media/$medium_name/$name-*.rpm");
-- 
cgit v1.2.1