hoersten-align-with-spaces.el
author Luke Hoersten <Luke@Hoersten.org>
Sun, 03 Apr 2011 11:26:27 -0500
changeset 34 8e91ec6fd0a2
parent 29 b52bb6669eed
permissions -rw-r--r--
Added eclipse-style line moving and eshell init.

;; ~/.emacs.d/hoersten-align-with-spaces.el
;; Luke Hoersten <[email protected]>

(global-set-key (kbd "C-c a") 'align-with-spaces)
(defun align-with-spaces (beg end pattern)
  "Align selected using only spaces for whitespace."
  (interactive "r\nsAlign by: ")
  (let ((indent-tabs-mode nil))
    (align-string beg end pattern 1)
    (align-entire beg end)
    (untabify beg end)
    (indent-region beg end)
    (whitespace-cleanup-region beg end)))

(message "Loaded Hoersten align-with-spaces function")
(provide 'hoersten-align-with-spaces)