Carsten Dominik 16 年之前
父节点
当前提交
8a2247454c
共有 1 个文件被更改,包括 7 次插入1 次删除
  1. 7 1
      lisp/org-clock.el

+ 7 - 1
lisp/org-clock.el

@@ -518,8 +518,14 @@ the clocking selection, associated with the letter `d'."
 
 (defvar msg-extra)
 (defun org-clock-get-sum-start ()
+  "Return the time from which clock times should be counted.
+This is for the currently running clock as it is displayed
+in the mode line.  This function looks at the properties
+LAST_REPEAT and in particular CLOCK_MODELINE_TOTAL and the
+corresponding variable `org-clock-modeline-total' and then
+decides which time to use."
   (let ((cmt (or (org-entry-get nil "CLOCK_MODELINE_TOTAL")
-		 (symbol-name 'org-clock-modeline-total)))
+		 (symbol-name org-clock-modeline-total)))
 	(lr (org-entry-get nil "LAST_REPEAT")))
     (cond
      ((equal cmt "current")