os-autoinst-distri-fedora/tests/apps_startstop/kde/kmouth.pm

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

# This test checks that Kmouth starts.

sub run {
    my $self = shift;
    
    # Start the application
    menu_launch_type 'kmouth';
    sleep 2;
    # Deal with the welcome screens
    assert_screen ["kde_next", "kde_finish"];
    while (match_has_tag "kde_next") {
        assert_and_click "kde_next"; 
        sleep 2;
        assert_screen ["kde_next", "kde_finish"];
    }
    # Settings close
    assert_and_click 'kde_finish';
    wait_still_screen 2;
    # Check that it is started
    assert_screen 'kmouth_runs';
    # Close the application
    quit_with_shortcut();
}

sub test_flags {
    return {always_rollback => 1};
}

1;

# vim: set sw=4 et: