Src bloklarını kuruluş modunda varsayılan olarak daralt

Bir orgdosyayı açtığımda, tüm srcblokların daraltılmasını ve açıkça org-cycleonları kapatana kadar bu şekilde kalmasını istiyorum .

Bu davranışı denetlemek için herhangi bir değişken bulamıyorum. Belki bir şeye bakmıyorum? Ya da belki birinin elisp çözümü var?

org-mode

— dadı
kaynak

Değişkeni kullanma hakkında konuşan ilgili soruların bağlantısı org-hide-block-startup: stackoverflow.com/a/21563210/2112489 . Ve aşağıdaki bağlantının, srcbir süre önce yazdığım blokların bisiklet görünürlüğü ile ilgisi var , ancak bunları varsayılan olarak gizlenecek şekilde ayarlamıyor. Bugün veya yarın üzerinde çalışmak için zamanım olmayacak, ancak siz veya başkalarının kodla biraz oynamak

— istemesi

Şu org-hide-block-allkomutu ekleyerek istediğiniz şeyi başarabilirsiniz org-mode-hook:

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

Kişisel yapılandırmam için bu çözümü biraz genişlettim:

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

Bu durumda, blokları varsayılan olarak org-modedaraltır ve tüm blokların görünürlüğünü vurarak değiştirmeme izin verir . (Bu kodu kullanmaya karar verirseniz, elbette anahtar bağlayıcıyı beğeninize göre uyarlayabilirsiniz.)SRCSRCC-c t

— itsjeyd
kaynak