Make C-k also copy same region, it would also kill

akermu · Jun 26, 2022 · 48172ce · 48172ce
1 parent 3155a47
commit 48172ce
Showing 1 changed file with 8 additions and 0 deletions.
diff --git a/vterm.el b/vterm.el
@@ -938,6 +938,14 @@ running in the terminal (like Emacs or Nano)."
                         (memq 'shift modifiers)
                         (memq 'meta modifiers)
                         (memq 'control modifiers)))))
+
+(defun vterm-send-C-k ()
+  "Send `C-k' to the libvterm and copy that region."
+  (interactive)
+  (let ((end (save-excursion
+	       (end-of-visible-line) (point))))
+    (copy-region-as-kill (point) end))
+  (vterm-send "C-k"))
 
 (defun vterm-send-start ()
   "Output from the system is started when the system receives START."