From fa7c7ca3edbea7d5f808008bfeed4d0c59dd5d0d Mon Sep 17 00:00:00 2001 From: Daniel Borchmann Date: Sun, 22 May 2022 17:20:19 +0200 Subject: [PATCH] Remove possibly obsolete Org mode fix --- init.el | 19 +------------------ 1 file changed, 1 insertion(+), 18 deletions(-) diff --git a/init.el b/init.el index a78351b..0eea7d2 100644 --- a/init.el +++ b/init.el @@ -920,24 +920,7 @@ (unless (memq #'org-clock-save (mapcar #'timer--function timer-list)) - (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)))))) + (run-with-timer 0 3600 #'org-clock-save)))) ;; Drag-and-Drop images into org-mode buffer (use-package org-download