bindings: provide usable shortcuts for prevword/nextword in tiny version

In the tiny version the feature toggles are absent, so most of the
Meta-key combinations do nothing, and when --with-slang was used, the
<Ctrl+Left/Right> keystrokes do not work (as they produce truncated
escape sequences under Slang), and the <Ctrl+Space> and <Alt+Space>
keystrokes are awkward to type and make no sense.  So... use some
of the free Meta combinations to jump a word to the left or right,
since these functions *are* present in the tiny version.
master
Benno Schulenberg 2018-12-10 11:09:36 +01:00
parent f13dd140eb
commit 37c8232f4d
1 changed files with 6 additions and 0 deletions

View File

@ -1180,6 +1180,12 @@ void shortcut_init(void)
add_to_sclist(MSOME, "^Left", CONTROL_LEFT, do_prev_word_void, 0);
add_to_sclist(MSOME, "^Right", CONTROL_RIGHT, do_next_word_void, 0);
}
#ifdef NANO_TINY
add_to_sclist(MMAIN, "M-B", 0, do_prev_word_void, 0);
add_to_sclist(MMAIN, "M-D", 0, do_prev_word_void, 0);
add_to_sclist(MMAIN, "M-F", 0, do_next_word_void, 0);
add_to_sclist(MMAIN, "M-N", 0, do_next_word_void, 0);
#endif
add_to_sclist(MMOST|MBROWSER, "M-Space", 0, do_prev_word_void, 0);
add_to_sclist(MMOST|MBROWSER, "^Space", 0, do_next_word_void, 0);
add_to_sclist(MMOST, "^A", 0, do_home, 0);