Згорнути блоки src в режимі org за замовчуванням

Коли я відкриваю orgфайл, я хочу, щоб усі srcблоки почали згортатися і залишатися таким чином, поки я org-cycleїх явно не відкрию .

Я не можу знайти жодної змінної для контролю такої поведінки. Можливо, я щось пропускаю? А може, хтось має елісп-рішення?

org-mode

— няня
джерело

Ось посилання на пов’язані питання, де йдеться про використання змінної org-hide-block-startup: stackoverflow.com/a/21563210/2112489 . І наступне посилання має щось спільне з циклічною видимістю srcблоків, про які я записав деякий час назад, але це не встановлює їх приховані за замовчуванням. У мене не буде часу для роботи над цим сьогодні або завтра, але ось посилання в разі , якщо ви або хто -то ще хоче грати трохи з кодом: stackoverflow.com/a/25496350/2112489

— lawlist

Ви можете досягти того, що хочете, додавши org-hide-block-allкоманду до org-mode-hook:

(add-hook 'org-mode-hook 'org-hide-block-all)

Для особистої конфігурації я трохи розширив це рішення:

(defvar org-blocks-hidden nil)

(defun org-toggle-blocks ()
  (interactive)
  (if org-blocks-hidden
      (org-show-block-all)
    (org-hide-block-all))
  (setq-local org-blocks-hidden (not org-blocks-hidden)))

(add-hook 'org-mode-hook 'org-toggle-blocks)

(define-key org-mode-map (kbd "C-c t") 'org-toggle-blocks)

Якщо це на місці, org-modeзгортає SRCблоки за замовчуванням і дозволяє перемикати видимість усіх SRCблоків, натискаючи C-c t. (Якщо ви вирішили скористатися цим кодом, ви, звичайно, можете адаптувати прив'язку ключа до свого смаку.)

— itjeyd
джерело