diff -p -up clisp-2.48/src/stream.d.orig clisp-2.48/src/stream.d --- clisp-2.48/src/stream.d.orig 2009-08-19 02:11:20.000000000 -0300 +++ clisp-2.48/src/stream.d 2009-08-19 02:12:21.000000000 -0300 @@ -9996,7 +9996,7 @@ local maygc object make_terminal_stream_ var bool same_tty = stdin_tty && stdout_tty && stdio_same_tty_p(); end_system_call(); #ifdef HAVE_TERMINAL3 - if (rl_gnu_readline_p && same_tty) { /* Build a TERMINAL3-Stream: */ + if (rl_gnu_readline_p && same_tty && !ilisp_mode) { /* Build a TERMINAL3-Stream: */ pushSTACK(make_ssstring(80)); /* allocate line-buffer */ pushSTACK(make_ssstring(80)); /* allocate line-buffer */ pushSTACK(allocate_handle(stdout_handle)); @@ -15198,11 +15198,6 @@ global maygc void init_streamvars (bool rl_readline_name = name; } #endif - if (ilisp_mode) { - /* Simulate the following instruction in .inputrc: - Control-i: self-insert */ - rl_bind_key(CTRL('I'),rl_named_function("self-insert")); - } rl_attempted_completion_function = &lisp_completion_matches; rl_completion_entry_function = &lisp_completion_more; rl_variable_bind("comment-begin",";");