Apple-2gs-SW/hush
1
0
Fork 0
mirror of https://github.com/sheumann/hush.git synced 2024-12-22 14:30:31 +00:00
Code Issues Projects Releases Wiki Activity

allow both ^H and DEL to backspace in insert mode (bug #23)

Browse Source
This commit is contained in:
Paul Fox 2005-07-18 22:17:25 +00:00
parent 0ef24c672a
commit d13b90b9e8
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
editors/vi.c
View File

@ -1612,7 +1612,7 @@ static Byte *char_insert(Byte * p, Byte c) // insert the char c at 'p'
if ((p[-1] != '\n') && (dot>text)) { if ((p[-1] != '\n') && (dot>text)) {
p--; p--;
} }
} else if (c == erase_char) { // Is this a BS } else if (c == erase_char || c == 8 || c == 127) { // Is this a BS
// 123456789 // 123456789
if ((p[-1] != '\n') && (dot>text)) { if ((p[-1] != '\n') && (dot>text)) {
p--; p--;
@ -3083,8 +3083,8 @@ key_cmd_mode:
break; break;
case 'h': // h- move left case 'h': // h- move left
case VI_K_LEFT: // cursor key Left case VI_K_LEFT: // cursor key Left
case 8: // ctrl-H- move left (This may be ERASE char) case 8: // ctrl-H- move left (This may be ERASE char)
case 127: // DEL- move left (This may be ERASE char) case 127: // DEL- move left (This may be ERASE char)
if (cmdcnt-- > 1) { if (cmdcnt-- > 1) {
do_cmd(c); do_cmd(c);
} // repeat cnt } // repeat cnt
@ -3249,7 +3249,7 @@ key_cmd_mode:
// //
// dont separate these two commands. 'f' depends on ';' // dont separate these two commands. 'f' depends on ';'
// //
//**** fall thru to ... 'i' //**** fall thru to ... ';'
case ';': // ;- look at rest of line for last forward char case ';': // ;- look at rest of line for last forward char
if (cmdcnt-- > 1) { if (cmdcnt-- > 1) {
do_cmd(';'); do_cmd(';');