diff options
| author | Peter Andersson <[email protected]> | 2015-04-22 14:09:48 +0200 |
|---|---|---|
| committer | Peter Andersson <[email protected]> | 2015-04-22 14:09:48 +0200 |
| commit | d756777e731fe7a8d63690ca0246c9cbd53dea75 (patch) | |
| tree | 6ce5e34c09c6f79c6db12b858a6ac41c8efe5e2b /lib/kernel/src/user_drv.erl | |
| parent | fc130e699774228f396dc6f4fef4b654edc00451 (diff) | |
| download | otp-d756777e731fe7a8d63690ca0246c9cbd53dea75.tar.gz otp-d756777e731fe7a8d63690ca0246c9cbd53dea75.tar.bz2 otp-d756777e731fe7a8d63690ca0246c9cbd53dea75.zip | |
Fix problem with unitialized edlin text buffer
Also make it possible to copy text buffer from current group
process to the JCL mode
Diffstat (limited to 'lib/kernel/src/user_drv.erl')
| -rw-r--r-- | lib/kernel/src/user_drv.erl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/kernel/src/user_drv.erl b/lib/kernel/src/user_drv.erl index f7b2be1ca3..380c685869 100644 --- a/lib/kernel/src/user_drv.erl +++ b/lib/kernel/src/user_drv.erl @@ -134,9 +134,6 @@ server1(Iport, Oport, Shell) -> [erlang:system_info(system_version)]))}, Iport, Oport), - %% Init edlin used by switch command - edlin:init(), - %% Enter the server loop. server_loop(Iport, Oport, Curr, User, Gr, queue:new()). @@ -319,6 +316,9 @@ handle_escape(Iport, Oport, User, Gr, IOQueue) -> _ -> % {ok,jcl} | undefined io_request({put_chars,unicode,"\nUser switch command\n"}, Iport, Oport), + %% init edlin used by switch command and have it copy the + %% text buffer from current group process + edlin:init(gr_cur_pid(Gr)), server_loop(Iport, Oport, User, switch_loop(Iport, Oport, Gr), IOQueue) end. |