diff options
| author | Yuki Ito <yuki@gnnk.net> | 2013-05-10 18:31:11 +0900 |
|---|---|---|
| committer | Yuki Ito <yuki@gnnk.net> | 2013-05-10 21:55:45 +0900 |
| commit | 553d2d28d76cc3d84a795b1a3000c4d29e16c1d0 (patch) | |
| tree | 5a1b7e8a2adc88093e74ddf0e54d66a788665a41 | |
| parent | 89939207898fc68a2ee0c080e603aa65fb866b25 (diff) | |
| download | erlang-553d2d28d76cc3d84a795b1a3000c4d29e16c1d0.tar.gz | |
Fix I/O-protocol error handling in eunit
ex_unit:io_request reuturns wrong value when it receive getopts or
get_geometry request
| -rw-r--r-- | lib/eunit/src/eunit_proc.erl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/eunit/src/eunit_proc.erl b/lib/eunit/src/eunit_proc.erl index ec7d93fd48..7647f0133c 100644 --- a/lib/eunit/src/eunit_proc.erl +++ b/lib/eunit/src/eunit_proc.erl @@ -643,11 +643,11 @@ io_request({get_until, _Prompt, _M, _F, _As}, Buf) -> io_request({setopts, _Opts}, Buf) -> {ok, Buf}; io_request(getopts, Buf) -> - {error, {error, enotsup}, Buf}; + {{error, enotsup}, Buf}; io_request({get_geometry,columns}, Buf) -> - {error, {error, enotsup}, Buf}; + {{error, enotsup}, Buf}; io_request({get_geometry,rows}, Buf) -> - {error, {error, enotsup}, Buf}; + {{error, enotsup}, Buf}; io_request({requests, Reqs}, Buf) -> io_requests(Reqs, {ok, Buf}); io_request(_, Buf) -> |