<div dir="ltr"><div>Hello, friends!</div><div><br></div><div>Key mapping extension for some terminals.</div><div>Add support new code sequences for: <span style="font-size:12px"><Home>, </span><span style="font-size:12px"><Forward>, </span><span style="font-size:12px"><Delete>, </span><span style="font-size:12px"><Ctrl>+<Delete></span></div>
<div><br><div class="" style="font-family:-moz-fixed;font-size:12px" lang="x-western"><pre>--- lib/stdlib/src/edlin.erl
+++ lib/stdlib/src/edlin.erl
@@ -232,12 +212,26 @@
 key_map($F, meta_o) -> end_of_line;
 key_map($\177, none) -> backward_delete_char;
 key_map($\177, meta) -> backward_kill_word;
 key_map($[, meta) -> meta_left_sq_bracket;
 key_map($D, meta_left_sq_bracket) -> backward_char;
 key_map($C, meta_left_sq_bracket) -> forward_char;
+
+% Eltex patch
+% support a <Home>
+key_map($H, meta_left_sq_bracket) -> beginning_of_line;
+% support a <Forward>
+key_map($F, meta_left_sq_bracket) -> end_of_line;
+% support a <Delete>
+key_map($3, meta_left_sq_bracket) -> {csi, "3"};
+key_map($~, {csi, "3"}) -> forward_delete_char;
+% support a <Ctrl>+<Delete>
+key_map($;, {csi, "3"}) -> {csi, "3;"};
+key_map($5, {csi, "3;"}) -> {csi, "3;5"};
+key_map($~, {csi, "3;5"}) -> kill_word;
+
 % support a few <CTRL>+<CURSOR LEFT|RIGHT> combinations...
 %  - forward:  \e\e[C, \e[5C, \e[1;5C
 %  - backward: \e\e[D, \e[5D, \e[1;5D
 key_map($\e, meta) -> meta_meta;
 key_map($[, meta_meta) -> meta_csi;
 key_map($C, meta_csi) -> forward_word;
</pre></div></div><br clear="all"><div><br></div>-- <br>---------------------------------------------<br>With best regards,<br>Alexander.
<div>Eltex</div></div>