awesome-emacs/org-roam
1
0
Fork 0
mirror of https://github.com/org-roam/org-roam synced 2025-09-18 16:06:49 -05:00
Code Issues Packages Projects Releases Wiki Activity

(perf): make Org load faster on literal find

Browse Source
This commit is contained in:
Jethro Kuan
2021-04-26 23:20:06 +08:00
parent d9ba961f96
commit 57f63461cd
1 changed files with 4 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
org-roam-macs.el
View File

@@ -53,11 +53,13 @@ Kills the buffer if KEEP-BUF-P is nil, and FILE is not yet visited."
(find-buffer-visiting ,file) ; If FILE is already visited, find buffer
(progn
(setq new-buf t)
(find-file-noselect ,file)))) ; Else, visit FILE and return buffer
(find-file-noselect ,file nil t)))) ; Else, visit FILE and return buffer
res)
(with-current-buffer buf
(unless (equal major-mode 'org-mode)
(delay-mode-hooks (org-mode)))
(delay-mode-hooks
(let ((org-inhibit-startup t))
(org-mode))))
(setq res (progn ,@body))
(unless (and new-buf (not ,keep-buf-p))
(save-buffer)))