Question

我正在使用org-mode来组织我的任务。我使用标准优先级。

是否可以在标准议程视图中插入空行？我每天都有很多任务，通常按优先级排序。 #A显示在顶部，＃B显示在中间，＃C显示在底部。

我希望在每个优先级类之后有一个空行作为分隔符（在所有#A任务之后一个空行，在所有#B任务之后一个空行，在#C任务之后一个空行）。这将使我的议程更具可读性。

我确实找到了关于如何在块之后插入分隔符的帮助，但我不使用块。

谢谢！

Answer 1

这里是评论中提供的代码@lawlist的有效解决方案。它将根据优先级

直观地界定当天的任务

  (defun my-custom-agenda-fn ()
    (save-excursion
     (let ((delimit "------------------------"))
      (org-agenda-goto-today)
      (dolist
          (priority '("\\[#A\\]" "\\[#B\\]" "\\[#C\\]" "\\[#D\\]" "\\[#E\\]"))
        (when (re-search-forward priority nil t)
          (goto-char (point-at-bol)) (insert (concat delimit "\n"))))
      (org-agenda-goto-today)
      (when (re-search-forward delimit nil t)
        (delete-region
         (progn (forward-visible-line 0) (point))
         (progn (forward-visible-line 1) (point))))
      ))
   )

(add-hook 'org-agenda-finalize-hook 'my-custom-agenda-fn)

如何在我的组织模式议程中插入空行？

1 个答案: