dbo/.emacs.d
dbo
/
.emacs.d
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Revert "Remove possibly obsolete Org mode fix" 

This reverts commit fa7c7ca3ed.

The hack is still necessary, as otherwise listing stuck Org projects takes too
long.
This commit is contained in:
Daniel - 2022-05-27 14:46:54 +02:00
parent 4dd7efe71a
commit f22990d611
Signed by: dbo
GPG Key ID: 784AA8DF0CCDF625
1 changed files with 18 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
init.el
View File

@ -919,7 +919,24 @@
(unless (memq #'org-clock-save
(mapcar #'timer--function timer-list))
(run-with-timer 0 3600 #'org-clock-save))))
(run-with-timer 0 3600 #'org-clock-save))
;; Hack: The default implementation is too slow, because it is
;; parsing all properties of an entry by default. Let’s simplify
;; this to only parse what we are looking for. This makes tag
;; search *much* faster!
(with-eval-after-load 'org
(defun org-cached-entry-get (pom property)
(if (or (eq t org-use-property-inheritance)
(and (stringp org-use-property-inheritance)
(let ((case-fold-search t))
(string-match-p org-use-property-inheritance property)))
(and (listp org-use-property-inheritance)
(member-ignore-case property org-use-property-inheritance)))
;; Caching is not possible, check it directly.
(org-entry-get pom property 'inherit)
;; This is different in the original implementation
(org-entry-get pom property))))))
;; Drag-and-Drop images into org-mode buffer
(use-package org-download