소스 검색

org-clock: Fix failing tests

* lisp/org-clock.el (org-clock-get-table-data): `org-get-heading' only
  accepts up to 2 arguments in Org 9.0.
Nicolas Goaziou 7 년 전
부모
커밋
cb5ca4206f
1개의 변경된 파일3개의 추가작업 그리고 1개의 파일을 삭제
  1. 3 1
      lisp/org-clock.el

+ 3 - 1
lisp/org-clock.el

@@ -2798,7 +2798,9 @@ PROPERTIES: The list properties specified in the `:properties' parameter
 	  (when (and time (> time 0) (org-at-heading-p))
 	    (let ((level (org-reduced-level (org-current-level))))
 	      (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
 			(if (not link) headline
 			  (let ((search