Mercurial > mxe-octave
view src/readline-1-paste.patch @ 4290:c85991d2fed4
* src/libffi.mk: update to 3.2.1
author | John D |
---|---|
date | Fri, 23 Dec 2016 08:47:13 -0500 |
parents | 9e62095edc58 |
children |
line wrap: on
line source
diff -u a/input.c b/readline-6.2/input.c --- a/input.c 2010-05-30 18:33:01.000000000 -0400 +++ b/input.c 2012-06-25 21:08:42.000000000 -0400 @@ -410,5 +412,5 @@ rl_read_key () { - int c; + int c, r; rl_key_sequence_length++; @@ -430,12 +432,16 @@ while (rl_event_hook) { - if (rl_gather_tyi () < 0) /* XXX - EIO */ + if (rl_get_char (&c) != 0) + break; + + if ((r = rl_gather_tyi ()) < 0) /* XXX - EIO */ { rl_done = 1; return ('\n'); } + else if (r == 1) /* read something */ + continue; + RL_CHECK_SIGNALS (); - if (rl_get_char (&c) != 0) - break; if (rl_done) /* XXX - experimental */ return ('\n');