diff options
| author | Robin Haberkorn <robin.haberkorn@googlemail.com> | 2011-10-14 01:49:24 +0200 |
|---|---|---|
| committer | Robin Haberkorn <robin.haberkorn@googlemail.com> | 2011-10-14 01:49:24 +0200 |
| commit | 90640c1aed302fd83a500bb9ccdfb6cf7b481112 (patch) | |
| tree | daaec6345cc64a77b8cf815c4e08409de997be63 /src/edit.erl | |
| parent | 190e6483ae66769e031c9b1ef0ca75d5fabe3e26 (diff) | |
| download | ermacs-fork-90640c1aed302fd83a500bb9ccdfb6cf7b481112.tar.gz | |
don't use now-incompatible file_gl for redirecting stdout to file
instead use the stderr group leader and redirect stderr on 'erl' invocation.
* let error_logger use its file logger handler
also let i:ii/1 use the list of modules to interpret directly. that way
'edit' can be debugged as well.
Diffstat (limited to 'src/edit.erl')
| -rw-r--r-- | src/edit.erl | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/edit.erl b/src/edit.erl index a1e0cbf..17e4f7a 100644 --- a/src/edit.erl +++ b/src/edit.erl @@ -34,13 +34,13 @@ start(Args) -> %% Another command-line entry function. Starts the editor with some %% modules loaded for debugging. debug() -> - lists:foreach(fun(Mod) -> i:ii(Mod) end, debug_modules()), + i:ii(debug_modules()), i:im(), sleep(1000), proc_lib:start_link(?MODULE, start, []). debug_modules() -> - [edit_display, edit_lib, ?EDIT_TERMINAL, edit_keymap, edit_buf, + [edit, edit_display, edit_lib, ?EDIT_TERMINAL, edit_keymap, edit_buf, edit_extended, edit_file, cord, edit_eval, edit_util, edit_text]. %% ---------------------------------------------------------------------- @@ -81,8 +81,8 @@ init() -> loop(State2). init_io_traps() -> - {ok, Leader} = file_gl:start_link("/tmp/edit.out"), - group_leader(Leader, self()), + group_leader(whereis(standard_error), self()), + ok = error_logger:logfile({open, "/tmp/ermacs-errors.log"}), error_logger:tty(false). %% Setup initial buffers (scratch and minibuffer) |