Подтвердить что ты не робот

Показать орг-режим до определенного уровня курса

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

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

Спасибо,

Даниель.

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

4b9b3361

Ответ 1

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

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

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

Ответ 2

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

Я также добавил свою собственную команду в мой файл .emacs init, привязав эту команду к 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)))

Ответ 3

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

(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))

`` `