показать схему в режиме org до определенного уровня заголовка - PullRequest
16 голосов
/ 01 июня 2011

Я делаю схему для своей диссертации, используя режим org, и я хотел бы показать все заголовки до определенного уровня (например, все заголовки уровня 1 и уровня 2).

Я не нашел ничего об этом в руководстве по режиму org.В цикле отображаются только заголовки уровня 1 или все заголовки, что слишком много информации в моем наброске прямо сейчас.

Спасибо,

Даниель.

Обновление: Я нашел обходной путь для него: установил переменную org-cycle-max-level.Это глобальная настройка.

Ответы [ 3 ]

19 голосов
/ 29 мая 2012

Просто наткнулся на этот вопрос.Год спустя, но, черт возьми ... Для этого есть команды, которые позволяют показывать заголовки до определенного уровня.

Одна команда C-<n> C-c tab покажет подзаголовки до уровня <n> (<n>=1,2,3...).

Другая команда - C-<n> S-tab, которая будет работать со всем буфером.Показывает все заголовки до уровня <n> (<n>=1,2,3...)

9 голосов
/ 03 июня 2011

Я нашел подходящее мне решение: команда org-content показывает иерархию папок, а числовой аргумент дает именно то, что я хочу: ограничить показанный максимальный уровень. В моем примере я хотел показать 2 уровня, чтобы я мог сделать C-2 M-x org-content <RET>.

Я также добавил свою собственную команду в мой .emacs файл инициализации, привязав эту команду к C-c m

(defun org-show-two-levels ()
  (interactive)
  (org-content 2))

(add-hook 'org-mode-hook
  (lambda ()
    (define-key org-mode-map "\C-cm" 'org-show-two-levels)))
1 голос
/ 07 сентября 2016

Если префиксные аргументы из ответа М. Кулмана требуют слишком много умственных способностей для вас (ограниченный ресурс, когда вы одновременно много думаете о чем-то другом), то вы можете использовать следующие функции для расширения заголовков контракта

(defvar hf-org-depth-point nil)
(defvar hf-org-depth-depth nil)

(defun hf-org-depth-increase ()
   (interactive)
   (hf-org-depth-incr 1))

(defun hf-org-depth-decrease ()
    (interactive)
    (hf-org-depth-incr -1))

(defun hf-org-depth-incr (incr)
    (when (not (equal (point) hf-org-depth-point))
        (setq hf-org-depth-point nil)
        (setq hf-org-depth-depth 0))a
    (setq hf-org-depth-point (point))
    (setq hf-org-depth-depth (max (+ hf-org-depth-depth incr) 0))
    (hide-subtree)
    (show-children hf-org-depth-depth))

`` `

...