瀏覽代碼

org-clock.el (org-clock-in): Fix bug in setting the clock heading

* org-clock.el (org-clock-in): Fix bug in setting the clock
heading.

TINYCHANGE
Levin Du 12 年之前
父節點
當前提交
996a49dd44
共有 1 個文件被更改,包括 2 次插入1 次删除
  1. 2 1
      lisp/org-clock.el

+ 2 - 1
lisp/org-clock.el

@@ -1172,7 +1172,8 @@ make this the default behavior.)"
 		  (cond ((and org-clock-heading-function
 			      (functionp org-clock-heading-function))
 			 (funcall org-clock-heading-function))
-			((looking-at org-complex-heading-regexp)
+			((and (looking-at org-complex-heading-regexp)
+			      (match-string 4))
 			 (replace-regexp-in-string
 			  "\\[\\[.*?\\]\\[\\(.*?\\)\\]\\]" "\\1"
 			  (match-string 4)))