lang/org: revise docstrings

This commit is contained in:
Henrik Lissner 2020-04-14 15:37:00 -04:00
parent 10a6b510d7
commit 169fe6a7f4
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
2 changed files with 6 additions and 4 deletions

View file

@ -436,12 +436,14 @@ with `org-cycle')."
;;;###autoload ;;;###autoload
(defun +org-unfold-to-2nd-level-or-point-h () (defun +org-unfold-to-2nd-level-or-point-h ()
"My version of the 'overview' #+STARTUP option: expand first-level headings. "Alters '#+STARTUP overview' to only expand first-level headings.
Expands the first level, but no further. If point was left somewhere deeper, Expands the first level, but no further. If a different startup option was
unfold to point on startup." provided, do that instead."
(unless org-agenda-inhibit-startup (unless org-agenda-inhibit-startup
;; TODO Implement a custom #+STARTUP option?
(when (eq org-startup-folded t) (when (eq org-startup-folded t)
(outline-hide-sublevels +org-initial-fold-level)) (outline-hide-sublevels +org-initial-fold-level))
;; If point was left somewhere deeper, unfold to point on startup.
(when (outline-invisible-p) (when (outline-invisible-p)
(ignore-errors (ignore-errors
(save-excursion (save-excursion

View file

@ -230,8 +230,8 @@ This forces it to read the background before rendering."
(require lang nil t)) (require lang nil t))
(add-to-list 'org-babel-load-languages (cons lang t))))) (add-to-list 'org-babel-load-languages (cons lang t)))))
;; Lazy load babel packages for exporting
(defadvice! +org--export-lazy-load-library-h () (defadvice! +org--export-lazy-load-library-h ()
"Lazy load a babel package when a block is executed during exporting."
:before #'org-babel-exp-src-block :before #'org-babel-exp-src-block
(+org--babel-lazy-load-library-a (org-babel-get-src-block-info))) (+org--babel-lazy-load-library-a (org-babel-get-src-block-info)))