[nongnu] elpa/eat cf011ad6b1 2/3: Capture keys 'M-backspace' and 'C-M-backspace'

[ELPA Syncer]

branch: elpa/eat
commit cf011ad6b1752a665369b9cb22361dba61b01e46
Author: Akib Azmain Turja <akib@disroot.org>
Commit: Akib Azmain Turja <akib@disroot.org>

    Capture keys 'M-backspace' and 'C-M-backspace'
    
    * eat.el (eat-term-input-event): Support 'M-backspace' and
    'C-M-backspace'.
    * eat.el (eat-term-make-keymap): Bind 'M-backspace' and
    'C-M-backspace'.
---
 eat.el | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/eat.el b/eat.el
index e01ee3ad23..d9aa2b08a5 100644
--- a/eat.el
+++ b/eat.el
@@ -3908,6 +3908,10 @@ client process may get confused."
            (send "\C-?"))
           ('C-backspace
            (send "\C-h"))
+          ('M-backspace
+           (send "\e\C-?"))
+          ('C-M-backspace
+           (send "\e\C-h"))
           ;; Function keys.
           ((and (pred symbolp)
                 fn-key
@@ -4193,6 +4197,7 @@ EXCEPTIONS is a list of key sequences to not bind.  Don't 
use
         ;; Bind `backspace', `delete', `deletechar', and all modified
         ;; variants.
         (dolist (key '( backspace C-backspace
+                        M-backspace C-M-backspace
                         insert C-insert M-insert S-insert C-M-insert
                         C-S-insert M-S-insert C-M-S-insert
                         delete C-delete M-delete S-delete C-M-delete