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

Prevent running of too many timers

Browse Source
This commit is contained in:
Jethro Kuan
2020-02-06 12:49:13 +08:00
parent f76fddd9cd
commit 8fda90b3aa
1 changed files with 6 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
org-roam.el
View File

@@ -233,13 +233,16 @@ Valid states are 'visible, 'exists and 'none."
(defun org-roam--enable () (defun org-roam--enable ()
(add-hook 'post-command-hook #'org-roam--maybe-update-buffer -100 t) (add-hook 'post-command-hook #'org-roam--maybe-update-buffer -100 t)
(setq org-roam-update-timer (unless org-roam-update-timer
(run-with-timer 0 (* org-roam-update-interval 60) 'org-roam--build-cache-async)) (setq org-roam-update-timer
(run-with-timer 0 (* org-roam-update-interval 60) 'org-roam--build-cache-async)))
(org-roam--maybe-update-buffer)) (org-roam--maybe-update-buffer))
(defun org-roam--disable () (defun org-roam--disable ()
(remove-hook 'post-command-hook #'org-roam--maybe-update-buffer) (remove-hook 'post-command-hook #'org-roam--maybe-update-buffer)
(cancel-timer org-roam-update-timer)) (when org-roam-update-timer
(cancel-timer org-roam-update-timer)
(setq org-roam-update-timer nil)))
(defun org-roam--setup-buffer () (defun org-roam--setup-buffer ()
"Setup the `org-roam' buffer at the `org-roam-position'." "Setup the `org-roam' buffer at the `org-roam-position'."