diff options
author | Siri Hansen <[email protected]> | 2017-10-23 13:55:18 +0200 |
---|---|---|
committer | Siri Hansen <[email protected]> | 2017-10-23 13:55:18 +0200 |
commit | 38dcead7d9736d0c5495e36ad04a1ff14607e1c3 (patch) | |
tree | 2bbcb04943f28580221222588d4df948acbd252e /lib/sasl | |
parent | db67b2c3d1198b2093cb9add3aa55c59bb368ab5 (diff) | |
parent | 541ee20b9eaefed7802f08cecddfbd12e5f3b516 (diff) | |
download | otp-38dcead7d9736d0c5495e36ad04a1ff14607e1c3.tar.gz otp-38dcead7d9736d0c5495e36ad04a1ff14607e1c3.tar.bz2 otp-38dcead7d9736d0c5495e36ad04a1ff14607e1c3.zip |
Merge branch 'maint'
Diffstat (limited to 'lib/sasl')
-rw-r--r-- | lib/sasl/src/format_lib_supp.erl | 6 | ||||
-rw-r--r-- | lib/sasl/test/rb_SUITE.erl | 18 |
2 files changed, 22 insertions, 2 deletions
diff --git a/lib/sasl/src/format_lib_supp.erl b/lib/sasl/src/format_lib_supp.erl index cfe2ec7668..2d37dfe117 100644 --- a/lib/sasl/src/format_lib_supp.erl +++ b/lib/sasl/src/format_lib_supp.erl @@ -86,8 +86,10 @@ print_data(Device, Line, [{Key, Value}|T]) -> print_data(Device, Line, [Value|T]) -> Modifier = misc_supp:modifier(Device), io:format(Device, "~"++Modifier++"p~n", [Value]), - print_data(Device, Line, T). - + print_data(Device, Line, T); +print_data(Device, _Line, Value) -> + Modifier = misc_supp:modifier(Device), + io:format(Device, "~"++Modifier++"p~n", [Value]). print_items(Device, Line, {Name, Items}) -> print_items(Device, Line, Name, Items). diff --git a/lib/sasl/test/rb_SUITE.erl b/lib/sasl/test/rb_SUITE.erl index 426dedbab5..4ba2540545 100644 --- a/lib/sasl/test/rb_SUITE.erl +++ b/lib/sasl/test/rb_SUITE.erl @@ -36,6 +36,7 @@ no_group_cases() -> groups() -> [{running_error_logger,[shuffle],[show, + show_other, list, rescan, start_stop_log, @@ -165,6 +166,23 @@ show(Config) -> ok. +show_other(Config) -> + PrivDir = ?config(priv_dir,Config), + OutFile = filename:join(PrivDir,"rb_SUITE_log.txt"), + + %% Insert some reports in the error log and start rb + error_logger:info_report([rb_test_term_in_list]), + error_logger:info_report(rb_test_term_no_list), + ok = start_rb(OutFile), + + %% Show by type and check content + [{_,I1},{_,I2}] = check_report(fun() -> rb:show(info_report) end,OutFile), + + true = contains(I1,"rb_test_term_no_list"), + true = contains(I2,"rb_test_term_in_list"), + + ok. + list(Config) -> PrivDir = ?config(priv_dir,Config), OutFile = filename:join(PrivDir,"rb_SUITE_log.txt"), |