Emacs组织模式:我如何折叠除当前标题之外的所有内容？

Question

我使用org-mode来处理多个文件中的任务和项目.

在每周议程中,可以使用<TAB>或跳转到每个TODO条目的位置<RET>.如果目标文件先前未打开,则会加载它,并将光标设置为正确的标题并展开整个文档,包括抽屉.

我非常希望看到只有稀疏的树,除了正确的标题折叠(子树可见性无关紧要).

可以通过使用循环全局可见性来折叠整个树C-u <TAB,但是我必须再次找到标题.

我知道我可以通过缩小缓冲区来隐藏其余部分,如下所述: Emacs,如何只显示当前任务并在org-mode中隐藏其他任务？ 但后来我放松了上下文(父母标题,轻松访问兄弟姐妹),抽屉仍然打开.

理想情况下,我希望有一个显示以下内容的命令:

• 顶级标题
• 目前的标题,以及它的所有父母都达到了顶级水平
• 目前的标题是孩子们

编辑:

user3173715发布的功能略有修改版似乎可以解决问题:

(defun org-show-current-heading-tidily ()
  "Show next entry, keeping other entries closed."
  (if (save-excursion (end-of-line) (outline-invisible-p))
      (progn (org-show-entry) (show-children))
    (outline-back-to-heading)
    (unless (and (bolp) (org-on-heading-p))
      (org-up-heading-safe)
      (hide-subtree)
      (error "Boundary reached"))
    (org-overview)
    (org-reveal t)
    (org-show-entry)
    (show-children)))

Answer 1

当前（2022）的 emacs 不再需要复杂的设置来实现问题中所述的目标：

• 顶级标题
• 当前的头条新闻，以及所有高层家长
• 当前头条的孩子们

在当前的 Emacs 和 org-mode 版本（Emacs 27.1，截至 2022 年 8 月）中，您可以按Shift-Tab Tab关闭所有标题，然后打开当前标题。至关重要的是，光标保留在当前折叠的标题上，因此Tab可以重新打开它。

我对默认安装的唯一重大更改是 Evil，这可能会也可能不会影响光标保留在折叠标题上的事实。

Answer 2

这是基于实际问题中编辑的答案.

如果对任何人有帮助:当我尝试将上面的内容绑定到一个热键时,我不断收到错误,命令错误的参数有些东西......结果发现必须添加(交互式)标志才能使其正常工作.下面是与M- =相关的函数示例

(defun org-show-current-heading-tidily ()
  (interactive)  ;Inteactive
  "Show next entry, keeping other entries closed."
  (if (save-excursion (end-of-line) (outline-invisible-p))
      (progn (org-show-entry) (show-children))
    (outline-back-to-heading)
    (unless (and (bolp) (org-on-heading-p))
      (org-up-heading-safe)
      (hide-subtree)
      (error "Boundary reached"))
    (org-overview)
    (org-reveal t)
    (org-show-entry)
    (show-children)))

(global-set-key "\M-=" 'org-show-current-heading-tidily)

@ Patrick.B感谢您的编辑!

Answer 3

检查您的组织启动选项 ( customize-group> org-startup)，例如org-startup-folded或org-agenda-inhibit-startup（其他人已经提到过这些）并将选项设置为仅显示折叠视图。此处#+STARTUP讨论组织模式变量。

您可能会注意到，当您现在跳转到议程时，所有内容都被折叠起来，甚至活动项目的父项也可能不可见。然后，您可以使用（按照手册）使上下文（父母，孩子，下一个兄弟姐妹）可见org-revealC-c C-r