Merge branch 'maint'

This commit is contained in:
Nicolas Goaziou 2017-04-29 10:26:59 +02:00
commit b4ba9f1770
1 changed files with 3 additions and 1 deletions

View File

@ -2800,7 +2800,9 @@ PROPERTIES: The list properties specified in the `:properties' parameter
(when (and time (> time 0) (org-at-heading-p)) (when (and time (> time 0) (org-at-heading-p))
(let ((level (org-reduced-level (org-current-level)))) (let ((level (org-reduced-level (org-current-level))))
(when (<= level maxlevel) (when (<= level maxlevel)
(let* ((headline (org-get-heading t t t t)) (let* ((headline (replace-regexp-in-string
(format "\\`%s[ \t]+" org-comment-string) ""
(nth 4 (org-heading-components))))
(hdl (hdl
(if (not link) headline (if (not link) headline
(let ((search (let ((search