|
@@ -518,7 +518,9 @@ cannot be translated."
|
|
|
(cond ((functionp org-clock-heading-function)
|
|
|
(funcall org-clock-heading-function))
|
|
|
((org-before-first-heading-p) "???")
|
|
|
- (t (org-get-heading t t t t))))
|
|
|
+ (t (replace-regexp-in-string
|
|
|
+ org-bracket-link-analytic-regexp "\\5"
|
|
|
+ (org-no-properties (org-get-heading t t t t))))))
|
|
|
|
|
|
(defun org-clock-menu ()
|
|
|
(interactive)
|