소스 검색

Merge branch 'maint'

Bastien Guerry 11 년 전
부모
커밋
c6d698a5ec
1개의 변경된 파일2개의 추가작업 그리고 1개의 파일을 삭제
  1. 2 1
      lisp/org.el

+ 2 - 1
lisp/org.el

@@ -7744,7 +7744,8 @@ command."
 	       pos hide-previous previous-pos)
 	       pos hide-previous previous-pos)
 
 
 	  ;; If we insert after content, move there and clean up whitespace
 	  ;; If we insert after content, move there and clean up whitespace
-	  (when (and respect-content (not (org-on-heading-p)))
+	  (when (and respect-content
+		     (not (org-looking-at-p org-outline-regexp-bol)))
 	    (org-end-of-subtree nil t)
 	    (org-end-of-subtree nil t)
 	    (skip-chars-backward " \r\n")
 	    (skip-chars-backward " \r\n")
 	    (and (not (looking-back "^\\*+"))
 	    (and (not (looking-back "^\\*+"))