;; Moving start line and start indend by C-a (defun back-to-indentation-or-beginning () (interactive) (if (= (point) (progn (back-to-indentation) (point))) (beginning-of-line))) (global-set-key "\C-a" 'back-to-indentation-or-beginning)