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

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

# This test checks that Kmail starts.

sub run {
    my $self = shift;

    # Start the application
    menu_launch_type 'kmail';
    # Cancel Kmail data wizard
    assert_and_click 'kde_cancel_button', timeout => 60;
    # Sometimes, the Kmail window is shown over the settings window.
    # If that is the case, assert that Kmail is running and exit.
    unless (check_screen("kmail_runs")) {
        if (check_screen("kde_cancel_button", 1)) {
            click_lastmatch;
        }
        assert_screen("kmail_runs");
    }
    else {
        assert_screen("kmail_runs");
    }
    # Close the application
    quit_with_shortcut();
}

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


1;

# vim: set sw=4 et: