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

# This test checks that Kgpg starts.

sub run {
    my $self = shift;
    
    # Start the application
    menu_launch_type 'kgpg';
    # Deal with the first wizard screen
    assert_and_click 'kgpg_next';
    wait_still_screen 2;
    # Deal with the second wizard screen
    assert_and_click 'kgpg_next_blue';
    wait_still_screen 2;
    # Create configuration file
    assert_and_click 'kgpg_create_config';
    wait_still_screen 2;
    # Click Next
    assert_and_click 'kgpg_next_blue';
    wait_still_screen 2;
    # Click Finish
    assert_and_click 'kgpg_done';
    wait_still_screen 2;
    # Cancel the keypair creation
    assert_and_click 'kgpg_keypair_cancel';
    wait_still_screen 2;
    # Close the Tips of the Day
    assert_and_click 'kgpg_tips_close';
    wait_still_screen 2;
    # Check that it is started
    assert_screen 'kgpg_runs';
    # Close the application
    quit_with_shortcut();
}

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


1;

# vim: set sw=4 et: