awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-03 12:27:26 -05:00
Code Issues Packages Projects Releases Wiki Activity

fix(docs): don't hide # lines in src blocks

Browse Source 
This would hide shebang lines and comments in languages that use # as a
line comment delimiter.
This commit is contained in:
Henrik Lissner
2022-09-15 21:19:02 +02:00
parent c8099a89ad
commit 451933b2ba
1 changed files with 15 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/lib/docs.el
View File

@ -148,6 +148,7 @@
(save-match-data (save-match-data
(let ((case-fold-search t)) (let ((case-fold-search t))
(while (re-search-forward "^[ \t]*\\#" nil t) (while (re-search-forward "^[ \t]*\\#" nil t)
(unless (org-in-src-block-p t)
(catch 'abort (catch 'abort
(org-fold-core-region (org-fold-core-region
(line-beginning-position) (line-beginning-position)
@ -161,7 +162,7 @@
((looking-at "+\\(?:begin\\|end\\)_\\([^ \n]+\\)") ((looking-at "+\\(?:begin\\|end\\)_\\([^ \n]+\\)")
(line-end-position)) (line-end-position))
((line-beginning-position 2))) ((line-beginning-position 2)))
doom-docs-mode 'doom-doc-hidden))))))) doom-docs-mode 'doom-doc-hidden))))))))
(defun doom-docs--hide-drawers-h () (defun doom-docs--hide-drawers-h ()
"Hide all property drawers." "Hide all property drawers."