Emacs: Tweak C-a behavior

2024-04-14 18:30:26 -07:00
parent a5646fd706
commit 8e75430b0b
2 changed files with 12 additions and 0 deletions
--- a/thoom-emacs/modules/thoom-editing.el
+++ 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)