From 5a5053aee60ce09991b6542a9c130759723de925 Mon Sep 17 00:00:00 2001 From: Philip Kaludercic Date: Mon, 27 May 2024 17:51:38 +0200 Subject: Bind delete-region to DEL --- do-at-point.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/do-at-point.el b/do-at-point.el index 962b32e..dcd3fb2 100644 --- a/do-at-point.el +++ b/do-at-point.el @@ -113,7 +113,8 @@ of this variable.") ,(lambda (start end) (let ((str (delete-and-extract-region start end))) (insert-for-yank (current-kill 0)) - (kill-new str t))))) + (kill-new str t)))) + (?\C-? "Delete" ,#'delete-region)) (email (?m "Compose message" ,(lambda (to) (compose-mail to)))) (existing-filename -- cgit v1.0