From b472884e5e7e9caf1ba70e8a09a67d92684650a8 Mon Sep 17 00:00:00 2001 From: Bastien Guerry Date: Tue, 5 Mar 2013 08:28:26 +0100 Subject: [PATCH] org.el (org-insert-heading): Don't delete spaces in empty headlines * org.el (org-insert-heading): Don't delete spaces in empty headlines. --- lisp/org.el | 2 ++ 1 file changed, 2 insertions(+) diff --git a/lisp/org.el b/lisp/org.el index 64b40a198..781e3be29 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -7447,6 +7447,8 @@ This is important for non-interactive uses of the command." (org-end-of-subtree nil t) (and (looking-at "^\\*") (backward-char 1)) (while (and (not (bobp)) + ;; Don't delete spaces in empty headlines + (not (looking-back org-outline-regexp)) (member (char-before) '(?\ ?\t ?\n))) (backward-delete-char 1))) (let ((p (point)))