add package select minimal

main.pm

@@ -30,6 +30,11 @@ else
 
     unless (get_var("KICKSTART"))
     {
+	# Select minimal flavor
+	if (get_var("FLAVOR") eq "server") {
+	    autotest::loadtest get_var('CASEDIR')."/tests/_select_minimal.pm";
+	}
+
         ## Disk partitioning
         if (get_var('DISK_GUIDED_EMPTY')){
             autotest::loadtest get_var('CASEDIR')."/tests/disk_guided_empty.pm";

needles/anaconda_main_hub_select_packages.json

@@ -0,0 +1,18 @@
+{
+  "area": [
+    {
+      "xpos": 690,
+      "ypos": 354,
+      "width": 195,
+      "height": 27,
+      "type": "match"
+    }
+  ],
+  "tags": [
+    "anaconda_main_hub_select_packages",
+    "ENV-DISTRI-fedora",
+    "ENV-INSTLANG-en_US",
+    "ENV-OFW-1",
+    "ENV-FLAVOR-server"
+  ]
+}

needles/anaconda_software_select_box.json

@@ -0,0 +1,18 @@
+{
+  "tags": [
+    "anaconda_software_select_box",
+    "ENV-DISTRI-fedora",
+    "ENV-INSTLANG-en_US",
+    "ENV-OFW-1",
+    "ENV-FLAVOR-server"
+  ],
+  "area": [
+    {
+      "xpos": 50,
+      "ypos": 189,
+      "width": 96,
+      "height": 18,
+      "type": "match"
+    }
+  ]
+}

tests/_select_minimal.pm

@@ -0,0 +1,36 @@
+use base "basetest";
+use strict;
+use testapi;
+
+sub run {
+    # Anaconda hub
+    assert_screen "anaconda_main_hub", 300; #
+
+    assert_and_click "anaconda_main_hub_select_packages";
+
+    assert_and_click "anaconda_software_select_box";
+
+    for (my $i = 0; $i < 20; $i++) {
+	send_key "down";
+    }
+
+    send_key "spc";
+
+    assert_and_click "anaconda_spoke_done";
+
+    # Anaconda hub
+    assert_screen "anaconda_main_hub", 50; #
+
+}
+
+sub test_flags {
+    # without anything - rollback to 'lastgood' snapshot if failed
+    # 'fatal' - whole test suite is in danger if this fails
+    # 'milestone' - after this test succeeds, update 'lastgood'
+    # 'important' - if this fails, set the overall state to 'fail'
+    return { fatal => 1 };
+}
+
+1;
+
+# vim: set sw=4 et: