emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

fix(org): only reveal point on save-place-after-find-file-hook

Browse source 
Prior to this change, whenever you enter an org-mode buffer, any
invisible regions around the cursor (which had been moved by save-place)
would be unfolded unconditionally. There may be cases where moving
the cursor immediately after visiting the file could cause errors (e.g.
when yasnippet tries to wrestle control over the cursor,
org-agenda-switch-to moves the cursor before switching to the buffer,
etc).

This change ensures the expansion *only* happens when save-place does
its thing (and successfully).
This commit is contained in:
Henrik Lissner 2024-03-13 00:07:01 -04:00
parent fec28a19e1
commit 39db5de570
No known key found for this signature in database
GPG key ID: B60957CA074D39A3
1 changed files with 10 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

15
modules/lang/org/config.el
View file

@ -1368,7 +1368,7 @@ between the two."
#'doom-disable-show-trailing-whitespace-h #'doom-disable-show-trailing-whitespace-h
;; #'+org-enable-auto-reformat-tables-h ;; #'+org-enable-auto-reformat-tables-h
;; #'+org-enable-auto-update-cookies-h ;; #'+org-enable-auto-update-cookies-h
#'+org-make-last-point-visible-h) )
(add-hook! 'org-load-hook (add-hook! 'org-load-hook
#'+org-init-org-directory-h #'+org-init-org-directory-h
@ -1435,15 +1435,20 @@ between the two."
:references #'+org-lookup-references-handler :references #'+org-lookup-references-handler
:documentation #'+org-lookup-documentation-handler) :documentation #'+org-lookup-documentation-handler)
;; HACK: Somehow, users/packages still find a way to modify tab-width in
;; org-mode. Since org-mode treats a non-standerd tab-width as an error
;; state, I use this hook to makes it much harder to change by accident.
(add-hook! 'org-mode-hook (add-hook! 'org-mode-hook
;; HACK: Somehow, users/packages still find a way to modify tab-width in
;; org-mode. Since org-mode treats a non-standerd tab-width as an error
;; state, I use this hook to makes it much harder to change by accident.
(add-hook! 'after-change-major-mode-hook :local (add-hook! 'after-change-major-mode-hook :local
;; The second check is necessary, in case of `org-edit-src-code' which ;; The second check is necessary, in case of `org-edit-src-code' which
;; clones a buffer and changes its major-mode. ;; clones a buffer and changes its major-mode.
(when (derived-mode-p 'org-mode) (when (derived-mode-p 'org-mode)
(setq tab-width 8)))) (setq tab-width 8)))
;; HACK: `save-place' can position the cursor in an invisible region. This
;; makes it visible unless `org-inhibit-startup' or
;; `org-inhibit-startup-visibility-stuff' is non-nil.
(add-hook 'save-place-after-find-file-hook #'+org-make-last-point-visible-h nil t))
;; Save target buffer after archiving a node. ;; Save target buffer after archiving a node.
(setq org-archive-subtree-save-file-p t) (setq org-archive-subtree-save-file-p t)