annotate src/readline-1-binding.patch @ 2980:2cf09b449d88

readline patches for windows from goffioul
author John W. Eaton <jwe@octave.org>
date Thu, 18 Apr 2013 02:04:36 -0400
parents
children c2864508b524
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
2980
2cf09b449d88 readline patches for windows from goffioul
John W. Eaton <jwe@octave.org>
parents:
diff changeset
1 diff -uNr a/readline.c b/readline.c
2cf09b449d88 readline patches for windows from goffioul
John W. Eaton <jwe@octave.org>
parents:
diff changeset
2 --- a/readline.c 2010-07-25 17:07:40.000000000 -0400
2cf09b449d88 readline patches for windows from goffioul
John W. Eaton <jwe@octave.org>
parents:
diff changeset
3 +++ b/readline.c 2013-04-17 20:38:42.637674309 -0400
2cf09b449d88 readline patches for windows from goffioul
John W. Eaton <jwe@octave.org>
parents:
diff changeset
4 @@ -1154,11 +1159,19 @@
2cf09b449d88 readline patches for windows from goffioul
John W. Eaton <jwe@octave.org>
parents:
diff changeset
5 rl_bind_keyseq_if_unbound ("\033OH", rl_beg_of_line);
2cf09b449d88 readline patches for windows from goffioul
John W. Eaton <jwe@octave.org>
parents:
diff changeset
6 rl_bind_keyseq_if_unbound ("\033OF", rl_end_of_line);
2cf09b449d88 readline patches for windows from goffioul
John W. Eaton <jwe@octave.org>
parents:
diff changeset
7
2cf09b449d88 readline patches for windows from goffioul
John W. Eaton <jwe@octave.org>
parents:
diff changeset
8 -#if defined (__MINGW32__)
2cf09b449d88 readline patches for windows from goffioul
John W. Eaton <jwe@octave.org>
parents:
diff changeset
9 +#if defined (__MINGW32__) && ! defined (_MSC_VER)
2cf09b449d88 readline patches for windows from goffioul
John W. Eaton <jwe@octave.org>
parents:
diff changeset
10 rl_bind_keyseq_if_unbound ("\340H", rl_get_previous_history);
2cf09b449d88 readline patches for windows from goffioul
John W. Eaton <jwe@octave.org>
parents:
diff changeset
11 rl_bind_keyseq_if_unbound ("\340P", rl_get_next_history);
2cf09b449d88 readline patches for windows from goffioul
John W. Eaton <jwe@octave.org>
parents:
diff changeset
12 rl_bind_keyseq_if_unbound ("\340M", rl_forward_char);
2cf09b449d88 readline patches for windows from goffioul
John W. Eaton <jwe@octave.org>
parents:
diff changeset
13 rl_bind_keyseq_if_unbound ("\340K", rl_backward_char);
2cf09b449d88 readline patches for windows from goffioul
John W. Eaton <jwe@octave.org>
parents:
diff changeset
14 + rl_bind_keyseq_if_unbound ("\340G", rl_beg_of_line);
2cf09b449d88 readline patches for windows from goffioul
John W. Eaton <jwe@octave.org>
parents:
diff changeset
15 + rl_bind_keyseq_if_unbound ("\340O", rl_end_of_line);
2cf09b449d88 readline patches for windows from goffioul
John W. Eaton <jwe@octave.org>
parents:
diff changeset
16 + rl_bind_keyseq_if_unbound ("\340S", rl_delete);
2cf09b449d88 readline patches for windows from goffioul
John W. Eaton <jwe@octave.org>
parents:
diff changeset
17 +#endif
2cf09b449d88 readline patches for windows from goffioul
John W. Eaton <jwe@octave.org>
parents:
diff changeset
18 +
2cf09b449d88 readline patches for windows from goffioul
John W. Eaton <jwe@octave.org>
parents:
diff changeset
19 +#ifdef _MSC_VER
2cf09b449d88 readline patches for windows from goffioul
John W. Eaton <jwe@octave.org>
parents:
diff changeset
20 + rl_bind_keyseq_if_unbound ("\033[3~", rl_delete);
2cf09b449d88 readline patches for windows from goffioul
John W. Eaton <jwe@octave.org>
parents:
diff changeset
21 + rl_bind_keyseq_if_unbound ("\033[X", _rl_update_terminal_size);
2cf09b449d88 readline patches for windows from goffioul
John W. Eaton <jwe@octave.org>
parents:
diff changeset
22 #endif
2cf09b449d88 readline patches for windows from goffioul
John W. Eaton <jwe@octave.org>
parents:
diff changeset
23
2cf09b449d88 readline patches for windows from goffioul
John W. Eaton <jwe@octave.org>
parents:
diff changeset
24 _rl_keymap = xkeymap;