From 0d1f2570d18282c489233af6e010783b1ca31eff Mon Sep 17 00:00:00 2001 From: Jeremy Baxter Date: Wed, 30 Apr 2025 09:59:37 +1200 Subject: [PATCH] emacs: bind `C-x w d' to trim-extra-space --- .emacs.d/init.el | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/.emacs.d/init.el b/.emacs.d/init.el index 09d2f93..1dddce6 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -16,7 +16,6 @@ ;; basic key binds (global-set-key (kbd "C-`") 'other-window) (global-set-key (kbd "C-x w c") 'whitespace-cleanup) -(global-set-key (kbd "C-x w d") 'delete-all-space) (global-set-key (kbd "C-x w f") 'forward-whitespace) (global-set-key (kbd "C-c c") 'compile) (global-set-key (kbd "C-c r") 'recompile) @@ -63,6 +62,10 @@ value `italic'." (find-file custom-file) (save-buffer) (kill-current-buffer)) +(defun trim-extra-space () + (interactive) + (delete-all-space) + (insert " ")) (add-hook 'after-change-major-mode-hook #'hide-minor-modes) @@ -72,6 +75,7 @@ value `italic'." (defalias 'wc 'count-words) ;; other key binds +(global-set-key (kbd "C-x w d") 'trim-extra-space) (global-set-key (kbd "C-c e b k") 'kill-all-buffers) (global-set-key (kbd "C-c e i") 'edit-init-file) (global-set-key (kbd "C-c e r") 'reindent-buffer)