From 8e75430b0b6cae288713062f1733977b6f952874 Mon Sep 17 00:00:00 2001 From: Tim McCarthy Date: Sun, 14 Apr 2024 18:30:26 -0700 Subject: [PATCH] Emacs: Tweak C-a behavior --- thoom-emacs/init.el | 2 ++ thoom-emacs/modules/thoom-editing.el | 10 ++++++++++ 2 files changed, 12 insertions(+) create mode 100644 thoom-emacs/modules/thoom-editing.el diff --git a/thoom-emacs/init.el b/thoom-emacs/init.el index dd88f35..66db260 100644 --- a/thoom-emacs/init.el +++ b/thoom-emacs/init.el @@ -14,6 +14,8 @@ (require 'thoom-elpaca) ;; OS-specific tweaks (require 'thoom-os) +;; Editing and keybind tweaks +(require 'thoom-editing) ;; Vertico, Embark, Corfu, etc (require 'thoom-completion) ;; Emacs appearance diff --git a/thoom-emacs/modules/thoom-editing.el b/thoom-emacs/modules/thoom-editing.el new file mode 100644 index 0000000..a9de9a0 --- /dev/null +++ b/thoom-emacs/modules/thoom-editing.el @@ -0,0 +1,10 @@ +(provide 'thoom-editing) + +(defun thoom/move-to-beginnings () + "Move between the two beginnings of a line: The very beginning, and the first non-whitespace character." + (interactive "^") + (if (bolp) + (back-to-indentation) + (move-beginning-of-line 1))) + +(global-set-key (kbd "C-a") #'thoom/move-to-beginnings)