Browse Source

Merge branch 'maint'

Bastien 4 năm trước cách đây
mục cha
commit
670f45e0ee
1 tập tin đã thay đổi với 3 bổ sung1 xóa
  1. 3 1
      lisp/org.el

+ 3 - 1
lisp/org.el

@@ -19081,7 +19081,9 @@ Also align node properties according to `org-property-format'."
                    (save-excursion
                      (beginning-of-line 1)
                      (skip-chars-backward "\n")
-                     (org-at-heading-p))))
+                     (or (org-at-heading-p)
+                         (org-at-drawer-p)
+                         (org-at-planning-p)))))
     (let* ((element (save-excursion (beginning-of-line) (org-element-at-point)))
 	   (type (org-element-type element)))
       (cond ((and (memq type '(plain-list item))