summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorKyle Meyer <kyle@kyleam.com>2014-12-16 01:14:41 -0500
committerKyle Meyer <kyle@kyleam.com>2014-12-16 01:14:41 -0500
commit2ff68140ef7a3a56aea318ad794a636bc9ed8abf (patch)
tree465a12cfe9f5119840c64170e101a818f0ea641a /lisp
parent4f55bdf9befbcf5d13dda5e857700db8b6bea70e (diff)
downloademacs.d-2ff68140ef7a3a56aea318ad794a636bc9ed8abf.tar.gz
Add command org-normalize-spaces
Diffstat (limited to 'lisp')
-rw-r--r--lisp/init-org.el8
1 files changed, 8 insertions, 0 deletions
diff --git a/lisp/init-org.el b/lisp/init-org.el
index 0300d1a..9d05e32 100644
--- a/lisp/init-org.el
+++ b/lisp/init-org.el
@@ -246,6 +246,14 @@ to
(beginning-of-line)
(open-line 1)))))
+(defun km/org-normalize-spaces ()
+ "Reduce to single spaces and add space before headings."
+ (interactive)
+ (km/reduce-to-single-spaces)
+ (km/org-add-blank-before-heading))
+
+(define-key km/org-prefix-map "n" 'km/org-normalize-spaces)
+
;;; Org in other modes
(defun km/load-orgstruct ()
(turn-on-orgstruct++)