Когда я редактирую большие документы, я хотел бы видеть, где я нахожусь, видя схему (без содержимого) в отдельном буфере. Например, когда вы читаете файл PDF, слева отображается оглавление. (увидеть ниже)
В режиме орг можно развернуть / свернуть контур. Но возможно ли иметь статический контур слева (или справа) в отдельном буфере, чтобы при нажатии на заголовки другой буфер перемещался в эту позицию?
Вроде как, но для орг-режима?
[Править]
Это clone-indirect-buffer
очень близко к тому, что я хочу. Недостающим элементом головоломки является прыжок в то же место при нажатии на заголовок / (или любую точку на самом деле).
Для этого я попытался написать некоторый код: перейти к другому клонированному буферу в ту же точку? (синхронизировать положение косвенных буферов) (org-mode)
Но это не работает, если контент свернут. Если это можно заставить работать, то clone-inderect-buffer является полным решением для этого.
[Edit2 Solution]
Код в ссылке выше и в ответе ниже объединяет niceley для решения прыжков вперед и назад.
;first call 'clone-indirect-buffer'. Then...
;This function works between buffer and it's clone.
(defun my/goto-same-spot-in-other-buffer ()
"Go to the same location in the other buffer. Useful for when you have cloned indirect buffers"
(interactive)
(let ((my/goto-current-point (point)))
(other-window 1)
(goto-char my/goto-current-point)
(when (invisible-p (point))
(org-reveal)))
)
;This function is a clone-to-buffer jump only:
; It does find the other buffer first thou instead of just jumping to the other
; window as does the function above.
(defun my/jump-to-point-and-show ()
"Switch to a cloned buffer's base buffer and move point to the
cursor position in the clone."
(interactive)
(let ((buf (buffer-base-buffer)))
(unless buf
(error "You need to be in a cloned buffer!"))
(let ((pos (point))
(win (car (get-buffer-window-list buf))))
(if win
(select-window win)
(other-window 1)
(switch-to-buffer buf))
(goto-char pos)
(when (invisible-p (point))
(show-branches)))))
(global-set-key (kbd "<s-mouse-1>") 'my/goto-same-spot-in-other-buffer)
(global-set-key (kbd "s-m") 'my/goto-same-spot-in-other-buffer)
(global-set-key (kbd "<C-s-mouse-1>") 'my/jump-to-point-and-show)
(global-set-key (kbd "C-s-m") 'my/jump-to-point-and-show)
org-sparse-tree-to-indirect-buffer
Например, нам нужна была бы функция, но она, кажется, не существует.
C-c C-x b
илиorg-tree-to-indirect-buffer
.