From 0fff0ba6da30e4ced73f84c8305d80c955bae132 Mon Sep 17 00:00:00 2001
From: Carsten Dominik <carsten.dominik@gmail.com>
Date: Mon, 22 Apr 2013 20:46:14 +0200
Subject: [PATCH] Fix insert-heading

* lisp/org.el (org-insert-heading): Fix problem with inserting
  heading.

The commit fixes a bug introduced in bb2022.
---
 lisp/org.el | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/lisp/org.el b/lisp/org.el
index 8c55bd4be..02c839c23 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -7509,9 +7509,10 @@ This is important for non-interactive uses of the command."
 	(and (not (org-in-item-p)) org-insert-heading-respect-content)
 	(not (org-insert-item
 	      (save-excursion
-		(org-beginning-of-item)
-		(looking-at org-list-full-item-re)
-		(match-string 3)))))
+		(and (org-in-item-p)
+		     (org-beginning-of-item)
+		     (looking-at org-list-full-item-re)
+		     (match-string 3))))))
     (let (begn endn)
       (when (org-buffer-narrowed-p)
 	(setq begn (point-min) endn (point-max))