org-mode перейти до останнього заголовка?

org-mode переходить до останнього заголовка у поточному дереві.

Скажіть, це мій org-файл, вказівник показує курсор:

* Top|
** Apple
** Banana
** Cherry
* Middle
** Ape
** Bear
** Cat

Я хотів би запустити команду, і тепер мій курсор буде тут:

* Top|
** Apple
** Banana
** Cherry|
* Middle
** Ape
** Bear
** Cat

Насправді org-end-of-subtreeфункція є, але вона не є інтерактивною. Ви можете просто визначити власну команду:

(defun goto-last-heading ()
  (interactive)
  (org-end-of-subtree))

Ось команда, заснована на відповіді @ itsjeyd, яка є надійною для крайового випадку, зазначеного в коментарі до цієї відповіді (тобто, коли ви перебуваєте в останньому заголовку / піддіреві):

(defun org-end-of-subtree ()
  (interactive)
  (let ((org-special-ctrl-a/e t))
    (if (condition-case nil
            (outline-forward-same-level 1)
          (error t))
        (progn
          (goto-char (point-max))
          (outline-back-to-heading))
      (outline-previous-visible-heading 1))
    (org-end-of-line 1)))

Я не думаю, що для цього є вбудована команда, але ви можете легко визначити її самостійно:

(defun org-goto-last-heading-in-tree ()
  (interactive)
  (org-forward-heading-same-level 1)     ; 1. Move to next tree
  (outline-previous-visible-heading 1)   ; 2. Move to last heading in previous tree
  (let ((org-special-ctrl-a/e t))        ; 3. Ignore tags when
    (org-end-of-line)))                  ;    moving to the end of the line

І прив’яжіть його до ключової послідовності на ваш вибір за допомогою:

(define-key org-mode-map (kbd "C-c g") 'org-goto-last-heading)