截断emacs模式行中的任务名称

在任务中计时时，任务名称将显示在模式行上。但是我的一些任务名称太长了。是否有函数截断模式行中的显示名称

---

谢谢。

您可以根据自己的口味来调整：

(setq org-clock-heading-function
      (lambda ()
        (let ((str (nth 4 (org-heading-components))))
          (if (> (length str) 6)
              (substring str 0 6)))))

---

我刚刚提交了一个编辑，以防止标题字符串少于6个字符时出错。