use base "installedtest";
use strict;
use testapi;
use utils;
use desktoptools;

# This script tests if Software can browse through lists of applications.

# As we cannot browse through all of the applications, we will only
# browse through three categories and pick one application from
# the editor's choice list.
# Hopefully, the application will be listed as we cannot move
# through the list except with scrolling the wheel, which is
# currently not supported by openQA.

sub run {
    my $self = shift;
    
    # Open the Create category.
    assert_and_click("software_category_create");
    assert_and_click("software_application_amarok");
    check_application_details("amarok");
    # Come back to the main screen
    while (! check_screen("gnome_search_button")) {
        assert_and_click("gnome_back_button");
    }

    # Open the Learn category.
    assert_and_click("software_category_learn");
    assert_and_click("software_application_octave");
    check_application_details("octave");
    # Come back to the main screen
    while (! check_screen("gnome_search_button")) {
        assert_and_click("gnome_back_button");
    }

    # Open the Play category.
    assert_and_click("software_category_play");
    assert_and_click("software_application_chess");
    check_application_details("chess");
}

sub test_flags {
    # When finished, rollback to milestone
    return {always_rollback => 1};
}

1;

# vim: set sw=4 et: