From: Amin Bandali Date: Mon, 13 Apr 2020 16:15:22 +0000 (-0400) Subject: Add convenience b/move-indentation-or-beginning-of-line, bind to C-a X-Git-Url: https://git.shemshak.org/~bandali/configs/commitdiff_plain/c64e010d0b51f1914d9bca263063506be9420540 Add convenience b/move-indentation-or-beginning-of-line, bind to C-a --- diff --git a/init.el b/init.el index 23158a1..e633282 100644 --- a/init.el +++ b/init.el @@ -239,6 +239,17 @@ For disabling the behaviour for certain buffers and/or modes." (interactive) (kill-buffer (current-buffer))) +(defun b/move-indentation-or-beginning-of-line (arg) + "Move to the indentation or to the beginning of line." + (interactive "^p") + ;; (if (bolp) + ;; (back-to-indentation) + ;; (move-beginning-of-line arg)) + (if (= (point) + (progn (back-to-indentation) + (point))) + (move-beginning-of-line arg))) + ;;; Defaults @@ -490,6 +501,7 @@ For disabling the behaviour for certain buffers and/or modes." ;;; General bindings (bind-keys + ("C-a" . b/move-indentation-or-beginning-of-line) ("C-c a i" . ielm) ("C-c e b" . eval-buffer)