Check vterm-keymap-exceptions for function keys

1 files changed, 3 insertions, 1 deletions

diff --git a/vterm.el b/vterm.el
index 469a12c..ba42192 100644
--- a/vterm.el
+++ b/vterm.el
@@ -182,7 +182,9 @@ for different shell. "
 (mapcar (lambda (key)
           (define-key vterm-mode-map (kbd key) #'vterm--self-insert))
         (append (cl-loop for number from 1 to 12
-                         collect (format "<f%i>" number))
+                         for key = (format "<f%i>" number)
+                         unless (member key vterm-keymap-exceptions)
+                         collect key)
                 (cl-loop for prefix in '("C-" "M-")
                          append (cl-loop for char from ?a to ?z
                                          for key = (format "%s%c" prefix char)