From c19cf68b2827e91e4749d1b2bcf94268bb21cf0a Mon Sep 17 00:00:00 2001 From: Akib Azmain Turja Date: Tue, 29 Nov 2022 00:37:47 +0600 Subject: [PATCH] * eat.el (eat-term-make-keymap): Use 'cl-flet' --- eat.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/eat.el b/eat.el index 0863dd3..8cd1b23 100644 --- a/eat.el +++ b/eat.el @@ -4766,9 +4766,9 @@ keywords: EXCEPTIONS is a list of key sequences to not bind. Don't use \"M-...\" key sequences in EXCEPTIONS, use \"ESC ...\" instead." (let ((map (make-sparse-keymap))) - (cl-labels ((bind (key) - (unless (member key exceptions) - (define-key map key input-command)))) + (cl-flet ((bind (key) + (unless (member key exceptions) + (define-key map key input-command)))) (when (memq :ascii categories) ;; Bind ASCII and self-insertable characters except ESC and ;; DEL.