1
0
mirror of https://pagure.io/fedora-qa/os-autoinst-distri-fedora.git synced 2024-11-30 09:33:07 +00:00
os-autoinst-distri-fedora/tests/applications/gnome-text-editor/new_file.pm
Adam Williamson 1a65993d36 Add a perltidy check and apply it to the entire codebase
Signed-off-by: Adam Williamson <awilliam@redhat.com>
2022-07-28 14:38:38 -07:00

53 lines
1.3 KiB
Perl

use base "installedtest";
use strict;
use testapi;
use utils;
# This part tests that we can create a new file that
# opens in a new panel, that we can add text, display
# text statistics and highlight code and save the file.
sub run {
my $self = shift;
# First we will use key combo to open the new document window.
sleep 5;
send_key("ctrl-t");
assert_screen "gte_new_document_opened";
# Now let us produce some text
type_safely "# My shopping list.\n\n";
type_safely "* **Milk**\n* *Apples*\n* `Bananas`\n* Bread\n* Butter\n* Cheese\n\n";
type_safely "Happy shopping.";
# Switch on Markdown Highlighting.
assert_and_click("gte_settings_button");
assert_and_click "gte_select_highlighting";
type_very_safely "markdown";
send_key "ret";
assert_and_click("gte_window_dismiss");
assert_screen "gte_code_highlighted";
# Save the newly created file.
send_key("ctrl-s");
wait_still_screen(3);
# select the entire prefilled name (including extension) to overwrite it
send_key("ctrl-a");
wait_still_screen(3);
type_very_safely "list.md";
send_key("ret");
# Check that the file has been created
$self->root_console(tty => 3);
assert_script_run "ls /home/test/list.md";
desktop_vt();
}
sub test_flags {
return {milestone => 1};
}
1;
# vim: set sw=4 et: