diff options
| author | Siri Hansen <[email protected]> | 2017-01-26 11:20:20 +0100 |
|---|---|---|
| committer | Siri Hansen <[email protected]> | 2017-01-26 11:20:20 +0100 |
| commit | bcb9300382459deea91038f4847ef3fa70137f11 (patch) | |
| tree | 954b9fbf642108082684136b32b71b8a8d925103 /lib/observer/test | |
| parent | 9153f7a734ddd9ca47b339cb19b8d44ed79ade0f (diff) | |
| parent | 15dd52f771314b6eade47314afcd8b3206c694b1 (diff) | |
| download | otp-bcb9300382459deea91038f4847ef3fa70137f11.tar.gz otp-bcb9300382459deea91038f4847ef3fa70137f11.tar.bz2 otp-bcb9300382459deea91038f4847ef3fa70137f11.zip | |
Merge branch 'maint'
Diffstat (limited to 'lib/observer/test')
| -rw-r--r-- | lib/observer/test/observer_SUITE.erl | 17 |
1 files changed, 15 insertions, 2 deletions
diff --git a/lib/observer/test/observer_SUITE.erl b/lib/observer/test/observer_SUITE.erl index 4c882ad951..b5fb027878 100644 --- a/lib/observer/test/observer_SUITE.erl +++ b/lib/observer/test/observer_SUITE.erl @@ -34,7 +34,8 @@ %% Test cases -export([app_file/1, appup_file/1, - basic/1, process_win/1, table_win/1 + basic/1, process_win/1, table_win/1, + port_win_when_tab_not_initiated/1 ]). %% Default timetrap timeout (set in init_per_testcase) @@ -49,7 +50,8 @@ groups() -> [{gui, [], [basic, process_win, - table_win + table_win, + port_win_when_tab_not_initiated ] }]. @@ -299,6 +301,17 @@ table_win(Config) when is_list(Config) -> observer:stop(), ok. +%% Test PR-1296/OTP-14151 +%% Clicking a link to a port before the port tab has been activated the +%% first time crashes observer. +port_win_when_tab_not_initiated(Config) -> + {ok,Port} = gen_tcp:listen(0,[]), + ok = observer:start(), + Notebook = setup_whitebox_testing(), + observer ! {open_link,erlang:port_to_list(Port)}, + timer:sleep(1000), + observer:stop(), + ok. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |