36 lines
1 KiB
Perl
36 lines
1 KiB
Perl
use base "installedtest";
|
|
use strict;
|
|
use testapi;
|
|
use utils;
|
|
|
|
# This part of the suite tests tests that Evince can Save the document As another document.
|
|
|
|
sub run {
|
|
my $self = shift;
|
|
|
|
# Open the menu.
|
|
assert_and_click("gnome_burger_menu", button => "left", timeout => 30);
|
|
|
|
# Select Save As
|
|
assert_and_click("evince_menu_saveas", button => "left", timeout => 30);
|
|
|
|
# Type a new name.
|
|
type_very_safely("alternative");
|
|
|
|
# Click on the Save button
|
|
assert_and_click("gnome_button_save_blue", button => "left", timeout => 30);
|
|
|
|
# Now the document is saved under a different name. We will switch to the
|
|
# terminal console to check that it has been created.
|
|
$self->root_console(tty => 3);
|
|
assert_script_run("ls /home/test/Documents/alternative.pdf");
|
|
|
|
# Now, check that the new file does not differ from the original one.
|
|
assert_script_run("diff /home/test/Documents/evince.pdf /home/test/Documents/alternative.pdf");
|
|
}
|
|
|
|
sub test_flags {
|
|
return {always_rollback => 1};
|
|
}
|
|
|
|
1;
|