diff options
| author | Patrik Nyblom <[email protected]> | 2013-02-14 15:37:16 +0100 |
|---|---|---|
| committer | Patrik Nyblom <[email protected]> | 2013-02-18 11:50:31 +0100 |
| commit | ae63487868032a31b7a8b2e44b49f4de07c9ec71 (patch) | |
| tree | 63261fdeddcfb2e8fe51d588d372d78e91f9c3b3 | |
| parent | d1b25f03be6c3c2bf1fd60b156f5974916f0a552 (diff) | |
| download | otp-ae63487868032a31b7a8b2e44b49f4de07c9ec71.tar.gz otp-ae63487868032a31b7a8b2e44b49f4de07c9ec71.tar.bz2 otp-ae63487868032a31b7a8b2e44b49f4de07c9ec71.zip | |
Fix io_proto_SUITE to handle the new io_lib_pretty:print
| -rw-r--r-- | lib/stdlib/test/io_proto_SUITE.erl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/stdlib/test/io_proto_SUITE.erl b/lib/stdlib/test/io_proto_SUITE.erl index 299daf0e42..ddcc8dfdab 100644 --- a/lib/stdlib/test/io_proto_SUITE.erl +++ b/lib/stdlib/test/io_proto_SUITE.erl @@ -716,7 +716,7 @@ binary_options(Config) when is_list(Config) -> {getline, "<<\"hej\\n\">>"}, {putline, "io:get_line('')."}, {putline, binary_to_list(<<"\345\344\366"/utf8>>)}, - {getline, "<<\""++binary_to_list(unicode:characters_to_binary(<<"\345\344\366"/utf8>>,latin1,utf8))++"\\n\">>"} + {getline, "<<\""++binary_to_list(<<"\345\344\366"/utf8>>)++"\\n\"/utf8>>"} ],[]) end, %% And one with oldshell @@ -1784,8 +1784,8 @@ get_default_shell() -> {putline, "whereis(user_drv)."}, {getline, "undefined"}],[]), old - catch E:R -> - ?dbg({E,R}), + catch _E:_R -> + ?dbg({_E,_R}), new end. |