diff --git a/tests/applications/keyring/keyring_initiate.pm b/tests/applications/keyring/keyring_initiate.pm index 69d726ee..c511b78a 100644 --- a/tests/applications/keyring/keyring_initiate.pm +++ b/tests/applications/keyring/keyring_initiate.pm @@ -51,6 +51,33 @@ sub run { # Close the application. send_key("alt-f4"); } + else { + # The Nautilus application is already started, so we begin + # with clicking on Other locations. + # We want to add a new connection and go through the + # password addition process. + assert_and_click("keyring_other_location"); + assert_and_click("keyring_location_line"); + type_very_safely("ftp://127.0.0.1"); + assert_and_click("keyring_button_connect"); + # We will set up the connection. + assert_and_click("keyring_select_registered"); + send_key("tab"); + type_very_safely("tucnak"); + send_key("tab"); + type_very_safely("weakpassword"); + # Reveal it so that we can check it is correctly + # written, when there are failures because of that + # (I have seen a couple of mistypes during development). + assert_and_click("keyring_remember_forever"); + assert_and_click("keyring_button_connect"); + # Check that we have opened the location and that + # we can see the FTP content. + assert_screen("keyring_test_file"); + # Close the application. + send_key("alt-f4"); + + } } sub test_flags {