我可以为我现在的位置创建一个稀疏树 - 即创建指向路径的组织模式稀疏树吗?

时间:2013-03-22 22:40:36

标签: emacs org-mode

标题几乎说: 我经常想要创建一个稀疏树 对于我当前缓冲区中的当前位置, 显示所有标题给我。

这是

** WANTED为我现在的位置创建一个稀疏树:orgmode:

我经常希望能够为我现在的位置创建稀疏树。 创建搜索C-c //有点痛苦 - 但那是我现在的克拉奇:

a)插入一个像HERE-I-AM

这样的唯一字符串

b)C-C // HERE-I-AM    (组织出现“HERE-I-AM”无)

给这样的东西

** My (org-mode) LOGS                           :top:
** LOGs :log
*** Fri Mar 22 2013
**** DONE org-mode - trying to get calendar to work
***** DONE rewrote docs
     - State "DONE"       from ""           [2013-03-22 Fri 14:49]

    blah blah blah

HERE-I-AM

** ...NEXT Daily Log

这显然不能令人满意。 例如可能没有写入权限

2 个答案:

答案 0 :(得分:1)

我很快就把你想要的东西扯掉了,或者至少关闭了:

(defun tr/path-sparse-tree ()
  "sparse tree to the current buffer position"
  (interactive)
  (setq pathmarker "Eeshoo9OomeiRaix") ;; random string obtained from
                                       ;; pwgen, probably a unique marker
                                       ;; in any org document...
  (save-excursion 
    (insert pathmarker)
    (org-occur pathmarker))
  (delete-char 16))

我本身不是emacs-lisp从业者,但我的快速测试对你的问题描述很有希望。至少这是你现在的kludge自动化; - )。

答案 1 :(得分:1)

这个功能可以做你想要的:

(defun my-org-sparse-tree ()
  "Create an org sparse tree showing only point"
  (interactive)
  (org-overview)      ;; Hide everything
  (org-show-context)) ;; Show context around point