pike.git / lib / modules / Stdio.pmod / Readline.pike

version» Context lines:

pike.git/lib/modules/Stdio.pmod/Readline.pike:1: - // $Id: Readline.pike,v 1.57 2004/11/02 20:19:59 mast Exp $ + // $Id: Readline.pike,v 1.58 2004/11/02 20:43:46 mast Exp $   #pike __REAL_VERSION__      //!   //! @fixme   //! Ought to have support for charset conversion.   class OutputController   {    static private .File outfd;    static private .Terminfo.Termcap term;    static private int xpos = 0, columns = 0;
pike.git/lib/modules/Stdio.pmod/Readline.pike:1041:    void clear_screen()    {    _readline->redisplay(1);    }       static array(array(string|function)) default_bindings = ({    ({ "^[[A", up_history }),    ({ "^[[B", down_history }),    ({ "^[[C", forward_char }),    ({ "^[[D", backward_char }), +  ({ "^[^[[C", forward_word }), +  ({ "^[^[[D", backward_word }),    ({ "^[C", capitalize_word }),    ({ "^[c", capitalize_word }),    ({ "^[U", upcase_word }),    ({ "^[u", upcase_word }),    ({ "^[L", downcase_word }),    ({ "^[l", downcase_word }),    ({ "^[D", kill_word }),    ({ "^[^H", backward_kill_word }),    ({ "^[^?", backward_kill_word }),    ({ "^[d", kill_word }),
pike.git/lib/modules/Stdio.pmod/Readline.pike:1083:    ({ "^V", quoted_insert }),    ({ "^W", kill_region }),    ({ "^Y", yank }),    ({ "^?", backward_delete_char }),    ({ "^X^X", swap_mark_and_point }),    // Termcap-style    ({ "\\!ku", up_history }),    ({ "\\!kd", down_history }),    ({ "\\!kr", forward_char }),    ({ "\\!kl", backward_char }), +  ({ "^[\\!kr", forward_word }), +  ({ "^[\\!kl", backward_word }),    ({ "\\!kD", delete_char }),    ({ "\\!kb", backward_delete_char }),    ({ "^[\\!kD", kill_word }),    ({ "^[\\!kb", backward_kill_word }),    ({ "\\!kh", beginning_of_line }),    ({ "\\!@7", end_of_line }),    ({ "\\!@8", newline }),    ({ "\\!ho", beginning_of_line }),    // Terminfo-style    ({ "\\!kcuu1", up_history }),    ({ "\\!kcud1", down_history }),    ({ "\\!kcuf1", forward_char }),    ({ "\\!kcub1", backward_char }), -  +  ({ "^[\\!kcuf1", forward_word }), +  ({ "^[\\!kcub1", backward_word }),    ({ "\\!kdch1", delete_char }),    ({ "\\!kbs", backward_delete_char }),    ({ "^[\\!kdch1", kill_word }),    ({ "^[\\!kbs", backward_kill_word }),    ({ "\\!khome", beginning_of_line }),    ({ "\\!kend", end_of_line }),    ({ "\\!kent", newline }),    ({ "\\!home", beginning_of_line }),    });