From ae63487868032a31b7a8b2e44b49f4de07c9ec71 Mon Sep 17 00:00:00 2001
From: Patrik Nyblom <pan@erlang.org>
Date: Thu, 14 Feb 2013 15:37:16 +0100
Subject: Fix io_proto_SUITE to handle the new io_lib_pretty:print

---
 lib/stdlib/test/io_proto_SUITE.erl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'lib/stdlib')

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.
 
-- 
cgit v1.2.3