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

try other buffer-file-coding-system fix

Browse Source 
Previous fix resulted in slow DB caching, suspect that it doesn't apply
the perf enhancements. Maybe this works? cc @nobiot
This commit is contained in:
Jethro Kuan
2021-05-03 11:41:20 +08:00
parent 1bbc20cfa8
commit eae1cdc00c
1 changed files with 8 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
org-roam-macs.el
View File

@@ -47,16 +47,21 @@
If FILE is nil, execute BODY in the current buffer.
Kills the buffer if KEEP-BUF-P is nil, and FILE is not yet visited."
(declare (indent 2) (debug t))
`(let* ((org-inhibit-startup t)
new-buf
`(let* (new-buf
(buf (or (and (not ,file)
(current-buffer)) ;If FILE is nil, use current buffer
(find-buffer-visiting ,file) ; If FILE is already visited, find buffer
(progn
(setq new-buf t)
(delay-mode-hooks (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
(kill-local-variable 'buffer-file-coding-system)
(kill-local-variable 'find-file-literally)
(unless (equal major-mode '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)))