Minor refactors

This commit is contained in:
Henrik Lissner 2020-10-20 16:52:39 -04:00
parent 88b42caab0
commit b857566239
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
3 changed files with 7 additions and 6 deletions

View file

@ -38,10 +38,11 @@
;; we wanted to keep visible.
org-journal-find-file #'find-file)
;; Setup carryover to include all configured TODO states.
;; Setup carryover to include all configured TODO states. We cannot carry over
;; [ ] keywords because `org-journal-carryover-items's syntax cannot correctly
;; interpret it as anything other than a date.
(setq org-journal-carryover-items "TODO=\"TODO\"|TODO=\"PROJ\"|TODO=\"STRT\"|TODO=\"WAIT\"|TODO=\"HOLD\"")
(set-popup-rule! "^\\*Org-journal search" :select t :quit t)
(map! (:map org-journal-mode-map

View file

@ -98,8 +98,8 @@ server getting expensively restarted when reverting buffers."
(run-at-time
(if (numberp +lsp-defer-shutdown) +lsp-defer-shutdown 3)
nil (lambda (workspace)
(let ((lsp--cur-workspace workspace))
(unless (lsp--workspace-buffers lsp--cur-workspace)
(with-lsp-workspace workspace
(unless (lsp--workspace-buffers workspace)
(let ((lsp-restart 'ignore))
(funcall orig-fn))
(+lsp-optimization-mode -1))))