I uninstalled undo-fu and re-ran the profiler. It takes even longer to save

org files now. Here's the profiler report now, does it look like helm-M-x is 

now the bottleneck?

[profiler-profile "24.3" cpu #s(hash-table size 730 test equal rehash-size 1.5 rehash-threshold 0.8125 data ([profiler-start funcall-interactively call-interactively command-execute helm-M-x-execute-command helm-execute-selection-action-1 helm-execute-selection-action helm-internal apply helm apply helm helm-M-x-read-extended-command helm-M-x funcall-interactively call-interactively] 1 [nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil] 388 [file-truename "#<compiled 0x1ff1205bba71>" cl-some projectile-project-root let doom-project-root or cond let +doom-dashboard--get-pwd let if +doom-dashboard-update-pwd-h cond +doom-dashboard-reload-maybe-h funcall] 1 [doom-modeline-segment--major-mode eval format-mode-line doom-modeline-format--main eval redisplay_internal\ \(C\ function\) nil nil nil nil nil nil nil nil nil nil] 1 [doom-modeline--get-buffers doom-modeline-segment--irc eval redisplay_internal\ \(C\ function\) nil nil nil nil nil nil nil nil nil nil nil nil] 1 [let cond let* save-restriction save-excursion catch org-element-context org-roam-link-replace-at-point org-roam-link-replace-all funcall condition-case doom-run-hook run-hook-wrapped condition-case let while] 1 [org-in-regexp org-roam-link-replace-at-point org-roam-link-replace-all funcall condition-case doom-run-hook run-hook-wrapped condition-case let while let doom-run-hooks apply run-hooks basic-save-buffer save-buffer] 1 [let* while let save-current-buffer org-element--cache-find and if setq let org-element-at-point or org-element-at-point-no-context or let* save-restriction save-excursion] 1 ["#<compiled 0x1ff11f7247a9>" apply prog1 let +org-inhibit-scrolling-a apply toc-org-insert-toc funcall condition-case doom-run-hook run-hook-wrapped condition-case let while let doom-run-hooks] 1 [abbreviate-file-name org-scan-tags org-encrypt-entries funcall condition-case doom-run-hook run-hook-wrapped condition-case let while let doom-run-hooks apply run-hooks basic-save-buffer save-buffer] 1 [if org-element-property car eq if or org-element--cache-key org-element--cache-key-less-p not or and if while if let* save-restriction] 151 [let* while let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if] 4141 [if let* or org-element--cache-key org-element--cache-key-less-p not or and if while if let* save-restriction save-excursion let progn] 81 [org-element-type eq if if if let* or org-element--cache-key org-element--cache-key-less-p not or and if while if let*] 33 [setq progn if if if if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map] 134 [progn setq cond let* while let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch] 15 [or org-element--cache-key org-element--cache-key-less-p and or and if setq if if while if let* save-restriction save-excursion let] 1695 [progn if org-element--cache-sync if if progn if let org-element-at-point progn if if if if while if] 4 [symbolp cond org-element-type eq if if if let* or org-element--cache-key org-element--cache-key-less-p not or and if while] 13 [if while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if if] 243 [org-element--cache-active-p and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let org-element-at-point progn] 1 [if org-element-property car eq if or org-element--cache-key org-element--cache-key-less-p and or and if setq if if while] 26 [let let if save-current-buffer progn if org-element--cache-sync if if progn if let org-element-at-point progn if if] 1409 [car eq if or org-element--cache-key org-element--cache-key-less-p and or and if setq if if while if let*] 1788 [cond let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let] 460 [let* or org-element--cache-key org-element--cache-key-less-p not or and if while if let* save-restriction save-excursion let progn progn] 7139 [let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if if if while if] 938 [org-element--cache-key-less-p not or and if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let] 3605 [while let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq] 3962 [< and or if if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let] 1302 [while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let org-element-at-point progn] 433 [eq if if let* or org-element--cache-key org-element--cache-key-less-p not or and if while if let* save-restriction save-excursion] 3529 [cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if if if while] 439 [memq if let* or org-element--cache-key org-element--cache-key-less-p not or and if while if let* save-restriction save-excursion let] 3527 [or org-element--cache-key org-element--cache-key-less-p not or and if while if let* save-restriction save-excursion let progn progn let*] 7245 [apply derived-mode-p and org-element--cache-active-p and if let org-element--cache-verify-element and if let org-element-at-point progn if if if] 232 [car eq if or org-element--cache-key org-element--cache-key-less-p not or and if while if let* save-restriction save-excursion let] 7090 [> not or and if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let] 3108 [and if let org-element-at-point progn if if if if while if let* save-restriction save-excursion let progn] 457 [eq if if if let* or org-element--cache-key org-element--cache-key-less-p not or and if while if let* save-restriction] 3602 [not or and if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let if] 3557 [org-element-type memq if if if if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map] 743 [and org-element--cache-active-p and if let org-element--cache-verify-element and if let org-element-at-point progn if if if if while] 220 [nconc list let let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq if if while let] 158 [and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if if if while] 691 [car eq if or org-element--cache-key org-element--cache-key-less-p not and or if if while if let* save-restriction save-excursion] 937 [save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq if if while let let* save-restriction save-excursion progn] 150 [cond org-element-type memq if let* or org-element--cache-key org-element--cache-key-less-p not or and if while if let* save-restriction] 42 [save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let org-element-at-point progn if if if] 1363 [let* or org-element--cache-key org-element--cache-key-less-p and or and if setq if if while if let* save-restriction save-excursion] 1824 [if while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let org-element-at-point] 245 [let* while let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq] 4069 [if save-current-buffer progn if org-element--cache-sync if if progn if let org-element-at-point progn if if if if] 454 [eq and if let org-element--cache-verify-element and if let org-element-at-point progn if if if if while if] 204 [if if progn if let org-element-at-point progn if if if if while if let* save-restriction save-excursion] 662 [let catch org-element--parse-to condition-case if setq let org-element-at-point progn if if if if while if let*] 1265 [memq if let* or org-element--cache-key org-element--cache-key-less-p and or and if setq if if while if let*] 862 [setcar if org-element-put-property let let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion progn unwind-protect] 12 [cond let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if] 472 [while let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if] 3890 [not and or if if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let] 432 [let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let org-element-at-point] 635 [eq if if let* or org-element--cache-key org-element--cache-key-less-p not and or if if while if let* save-restriction] 454 [or if if if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let if] 15 [let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let org-element-at-point progn if if] 869 [or let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if if if] 479 [eq if if if let* or org-element--cache-key org-element--cache-key-less-p and or and if setq if if while] 859 [setcar if org-element-put-property if while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let] 8 [and or and if setq if if while if let* save-restriction save-excursion let progn progn let*] 889 [let* or org-element--cache-key org-element--cache-key-less-p not and or if if while if let* save-restriction save-excursion let progn] 904 [catch org-element--parse-to org-element-type memq if if if if while if let* save-restriction save-excursion let progn progn] 230 [apply derived-mode-p and org-element--cache-active-p and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if] 116 [or org-element--cache-key org-element--cache-key-less-p not and or if if while if let* save-restriction save-excursion let progn progn] 942 [save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if if if while if let*] 1320 [memq if if if if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let] 243 [eq if let org-element-at-point progn if if if if while if let* save-restriction save-excursion let progn] 258 [let cond let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if] 900 [and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let org-element-at-point progn if] 632 [save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if if] 950 [let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let org-element-at-point progn if] 418 [setq progn if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let if if] 697 [let cond let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq] 894 [org-element--cache-key-less-p and or and if setq if if while if let* save-restriction save-excursion let progn progn] 885 [setq if if while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn] 48 [eq if if let* or org-element--cache-key org-element--cache-key-less-p and or and if setq if if while if] 950 [<= and while let cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq] 443 [progn if let save-excursion org-element--current-element setq if if while let let* save-restriction save-excursion progn unwind-protect let] 41 [progn if if if if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let] 493 [rx--translate mapcar rx--translate-seq rx--translate-counted-repetition rx--translate-repeat rx--translate-form rx--translate mapcar rx--translate-seq rx--translate-form rx--translate rx-to-string re-search-backward if progn unwind-protect] 17 [save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let org-element-at-point] 911 [while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if if if] 451 [= or if if if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let] 457 [and if let org-element--cache-verify-element and if let org-element-at-point progn if if if if while if let*] 983 [org-back-to-heading-or-point-min org-end-of-subtree progn unwind-protect let* save-excursion let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq if] 64 [<= and while let cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if] 458 [or let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn if let org-element--cache-verify-element] 25 [save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let] 177 [if setq let org-element-at-point progn if if if if while if let* save-restriction save-excursion let progn] 120 [nconc list let let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion progn unwind-protect let] 187 [progn unwind-protect let catch org-element--parse-to condition-case if setq let org-element-at-point progn if if if if while] 499 [save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn if let org-element--cache-verify-element save-restriction save-excursion save-excursion] 3 [replace-regexp-in-string org-trim let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq if if while let let*] 377 [let progn if let org-element--cache-verify-element and if let org-element-at-point progn if if if if while if] 50 [eq if if if let* or org-element--cache-key org-element--cache-key-less-p not and or if if while if let*] 452 [condition-case if setq let org-element-at-point progn if if if if while if let* save-restriction save-excursion let] 665 [or let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let org-element-at-point progn] 485 [org-element--cache-key-less-p not and or if if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map] 457 [if if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let if if let*] 22 [< and or and if setq if if while if let* save-restriction save-excursion let progn progn] 894 [org-end-of-subtree progn unwind-protect let* save-excursion let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion progn] 84 [progn unwind-protect let* save-excursion let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq if if while] 12 [let if save-current-buffer progn if org-element--cache-sync if if progn if let org-element-at-point progn if if if] 246 [if if if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let if if] 8 [cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let org-element-at-point progn if] 433 [let progn if cond let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let] 69 [let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn if let] 47 [let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if] 20 [let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if if] 691 [let catch org-element--parse-to org-element-type memq if if if if while if let* save-restriction save-excursion let progn] 1554 [eq and if let progn if let org-element--cache-verify-element and if let org-element-at-point progn if if if] 132 [apply rx-to-string re-search-backward if progn unwind-protect let progn if cond let while let let* save-restriction save-excursion] 20 [let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let] 113 [progn unwind-protect let catch org-element--parse-to org-element-type memq if if if if while if let* save-restriction save-excursion] 459 [if let org-element-at-point progn if if if if while if let* save-restriction save-excursion let progn progn] 205 [rx--sequence rx--translate-seq rx--translate-form rx--translate rx-to-string re-search-forward and if if progn unwind-protect let progn if cond let] 18 [org-element-at-point progn if if if if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map] 252 [progn and let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion progn unwind-protect let catch] 43 [catch org-element--parse-to condition-case if setq let org-element-at-point progn if if if if while if let* save-restriction] 215 [memq if org-element--parse-to let let progn if let org-element--cache-verify-element and if let org-element-at-point progn if if] 8 [< and if let org-element--cache-verify-element and if let org-element-at-point progn if if if if while if] 113 [1- cons cons cons cons cons cons rx-to-string re-search-forward and if if progn unwind-protect let progn] 17 [memq if let* or org-element--cache-key org-element--cache-key-less-p not and or if if while if let* save-restriction save-excursion] 468 [save-excursion let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to] 15 [let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if if if while] 447 [progn unwind-protect let* save-excursion let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion progn unwind-protect] 24 [apply derived-mode-p and org-element--cache-active-p if let org-element-at-point progn if if if if while if let* save-restriction] 116 [or and if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let if if] 68 [org-element-headline-parser cond setq let save-excursion org-element--current-element setq if if while let let* save-restriction save-excursion progn unwind-protect] 51 [and org-element--cache-active-p and if let org-element-at-point progn if if if if while if let* save-restriction save-excursion] 105 [rx--translate mapcar rx--translate-seq rx--translate-form rx--translate rx-to-string re-search-forward and if if progn unwind-protect let progn if cond] 14 [cond org-element-type eq if if if let* or org-element--cache-key org-element--cache-key-less-p not or and if while if] 44 [apply replace-regexp-in-string org-trim let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq if if while let] 71 [fset progn unwind-protect let* save-excursion let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion progn] 1 [apply derived-mode-p and org-element--cache-active-p and if let org-element-at-point progn if if if if while if let*] 117 [if let* or org-element--cache-key org-element--cache-key-less-p and or and if setq if if while if let* save-restriction] 17 [and or if if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let if] 12 [memq not and if let org-element--cache-verify-element and if let org-element-at-point progn if if if if while] 216 [eq not if if if let org-element-at-point progn if if if if while if let* save-restriction] 201 [progn and if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let if if] 7 [org-at-heading-p org-back-to-heading org-up-heading-safe org-up-heading-or-point-min progn unwind-protect let* save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element and] 23 [save-excursion save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let org-element-at-point progn if if] 26 [save-excursion let progn if let org-element--cache-verify-element and if let org-element-at-point progn if if if if while] 22 [if if if let* or org-element--cache-key org-element--cache-key-less-p not and or if if while if let* save-restriction] 7 [if org-element-property car eq if or org-element--cache-key org-element--cache-key-less-p not and or if if while if let*] 14 [and org-element--cache-active-p if let org-element-at-point progn if if if if while if let* save-restriction save-excursion let] 110 [while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn if let org-element--cache-verify-element] 38 [progn and let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq if if while let let*] 47 [cond let* while let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case] 68 [save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element and if let org-element-at-point progn if if if] 21 [let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn if let org-element--cache-verify-element and] 20 [if while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn if let] 37 [and or and org-element--cache-active-p and if let org-element--cache-verify-element and if let org-element-at-point progn if if if] 8 [if setq if if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let if] 5 [let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn if let org-element--cache-verify-element and if] 36 [setcar if org-element-put-property progn if let save-excursion org-element--current-element setq if if while let let* save-restriction save-excursion] 18 [and org-element--cache-active-p and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if if] 116 [cond org-element-type eq if if let* or org-element--cache-key org-element--cache-key-less-p not or and if while if let*] 30 [replace-regexp-in-string org-trim let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion progn unwind-protect let catch] 346 [rx--enclose rx--bracket rx--atomic-regexp rx-to-string re-search-backward if progn unwind-protect let progn if cond let while let let*] 28 [org-end-of-subtree progn unwind-protect let* save-excursion let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq if if] 78 [if org-element-property let* or org-element--cache-key org-element--cache-key-less-p not or and if while if let* save-restriction save-excursion let] 57 [cons cons rx-to-string re-search-backward if progn unwind-protect let progn if cond let while let let* save-restriction] 10 [save-excursion org-element--current-element setq if if while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let] 30 [rx--translate-seq rx--translate-form rx--translate rx-to-string re-search-backward if progn unwind-protect let progn if cond let while let let*] 32 [if org-element-property let* while let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to] 52 [apply derived-mode-p and if let org-element--cache-verify-element and if let org-element-at-point progn if if if if while] 112 [or progn aref progn progn org-element--headline-cache-root if setq progn if if if if while if let*] 4 [if let* save-restriction save-excursion let progn progn let* org-element-cache-map let if if let* save-restriction save-excursion let] 28 [apply replace-regexp-in-string org-trim let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion progn unwind-protect let] 62 [and or and org-element--cache-active-p and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if] 9 [plist-get if org-element-property let* or org-element--cache-key org-element--cache-key-less-p not or and if while if let* save-restriction save-excursion] 14 [eq and if let progn if let org-element--cache-verify-element save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element] 7 [progn if let org-element--cache-verify-element and if let org-element-at-point progn if if if if while if let*] 18 [org-at-heading-p let* progn cond setq let save-excursion org-element--current-element setq if if while let let* save-restriction save-excursion] 48 [if org-element-property < and or if if while if let* save-restriction save-excursion let progn progn let*] 12 [let let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to] 40 [re-search-forward if let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion progn unwind-protect let catch] 14 [if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let if if let* save-restriction] 53 [apply derived-mode-p and org-element--cache-active-p and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq] 131 [looking-at let and let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq if if while let] 22 [if let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq if if while let let* save-restriction] 2 [let catch org-element--parse-to let let progn if let org-element--cache-verify-element and if let org-element-at-point progn if if] 31 [save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn if let org-element--cache-verify-element and if let] 42 [let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq if if while let let* save-restriction save-excursion] 104 [org-trim let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq if if while let let* save-restriction] 35 [and if let org-element--cache-verify-element save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element and if let org-element-at-point] 28 [eq and if let org-element--cache-verify-element save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element and if let] 6 [1- if list nconc list let let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion] 55 [rx--translate-repeat rx--translate-form rx--translate mapcar rx--translate-seq rx--translate-form rx--translate rx-to-string re-search-backward if progn unwind-protect let progn if cond] 13 [org-up-heading-or-point-min progn unwind-protect let* save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element and if let org-element-at-point] 38 [org-element--get-time-properties let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to] 42 [let* save-excursion let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion progn unwind-protect let catch] 11 [rx--bracket rx--atomic-regexp rx-to-string re-search-backward if progn unwind-protect let progn if cond let while let let* save-restriction] 8 [/= and if if progn unwind-protect let progn if cond let while let let* save-restriction save-excursion] 19 [let let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq if if while let let* save-restriction] 42 [org-get-limited-outline-regexp org-before-first-heading-p org-back-to-heading-or-point-min org-end-of-subtree progn unwind-protect let* save-excursion let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element] 16 [apply derived-mode-p and org-element--cache-active-p and if let org-element--cache-verify-element save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element] 9 [let* progn if cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn if] 42 [let let progn if let org-element--cache-verify-element and if let org-element-at-point progn if if if if while] 18 [if org-element--cache-key-less-p not or and if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map] 26 [org-trim let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to] 39 [if if let* or org-element--cache-key org-element--cache-key-less-p and or and if setq if if while if let*] 18 [org-element-property car eq if or org-element--cache-key org-element--cache-key-less-p not and or if if while if let* save-restriction] 4 [< and if let org-element--cache-verify-element save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element and if let] 3 [save-excursion save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if if if while if] 74 [and org-element--cache-active-p and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let org-element-at-point] 122 [looking-at let and let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion progn unwind-protect let] 17 [org-element-property let* or org-element--cache-key org-element--cache-key-less-p not or and if while if let* save-restriction save-excursion let progn] 28 [org-element--cache-verify-element save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element and if let org-element-at-point progn if if] 8 [= or if save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element and if let org-element-at-point progn] 14 [let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let] 24 [setq progn if cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn if] 14 [mapcar rx--translate-seq rx--translate-counted-repetition rx--translate-bounded-repetition rx--translate-repeat rx--translate-form rx--translate mapcar rx--translate-seq rx--translate-form rx--translate rx-to-string re-search-forward and if if] 6 [if if let* or org-element--cache-key org-element--cache-key-less-p not or and if while if let* save-restriction save-excursion let] 55 [cons cons cons cons cons rx-to-string re-search-backward if progn unwind-protect let progn if cond let while] 21 [org-at-heading-p org-back-to-heading org-up-heading-or-point-min progn unwind-protect let* save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element and if] 20 [apply rx-to-string re-search-forward and if if progn unwind-protect let progn if cond let while let let*] 18 [org-at-heading-p org-back-to-heading org-back-to-heading-or-point-min org-end-of-subtree progn unwind-protect let* save-excursion let* save-excursion org-element-headline-parser setq progn if cond let*] 55 [cond org-element-type eq if let org-element-at-point progn if if if if while if let* save-restriction save-excursion] 4 [org-element--parse-to org-element-type memq if if if if while if let* save-restriction save-excursion let progn progn let*] 9 [rx--translate-seq rx--translate-form rx--translate rx-to-string re-search-forward and if if progn unwind-protect let progn if cond let while] 19 [setq cond let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn] 25 [org-element-type eq if if let* or org-element--cache-key org-element--cache-key-less-p not or and if while if let* save-restriction] 40 [symbolp cond org-element-type memq if let* or org-element--cache-key org-element--cache-key-less-p not or and if while if let*] 13 [mapcar rx--translate-seq rx--translate-form rx--translate rx-to-string re-search-forward and if if progn unwind-protect let progn if cond let] 6 [progn setq if if setq if if while if let* save-restriction save-excursion let progn progn let*] 2 [progn if cond let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let] 9 [let* progn cond setq let save-excursion org-element--current-element setq if if while let let* save-restriction save-excursion progn] 9 [org-element--get-node-properties let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to] 33 [org-back-to-heading-or-point-min org-end-of-subtree progn unwind-protect let* save-excursion let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion] 68 [if org-element-at-point progn if if if if while if let* save-restriction save-excursion let progn progn let*] 4 [let org-element--cache-verify-element and if let org-element-at-point progn if if if if while if let* save-restriction save-excursion] 14 [rx--translate-bounded-repetition rx--translate-repeat rx--translate-form rx--translate mapcar rx--translate-seq rx--translate-form rx--translate rx-to-string re-search-forward and if if progn unwind-protect let] 23 [apply derived-mode-p org-end-of-subtree progn unwind-protect let* save-excursion let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq] 7 [progn progn setq while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let if if] 19 [rx--translate-counted-repetition rx--translate-bounded-repetition rx--translate-repeat rx--translate-form rx--translate mapcar rx--translate-seq rx--translate-form rx--translate rx-to-string re-search-forward and if if progn unwind-protect] 20 [and or and org-element--cache-active-p and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq] 10 [and org-element--cache-active-p and if let org-element--cache-verify-element save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element and if] 11 [not cond org-element-type memq if let* or org-element--cache-key org-element--cache-key-less-p not or and if while if let*] 16 [or cond let* while let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to] 22 [or if if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let if if] 9 [org-element--get-time-properties let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq if if while let let* save-restriction] 31 [cond let* while let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type] 61 [if if let* or org-element--cache-key org-element--cache-key-less-p not and or if if while if let* save-restriction save-excursion] 6 [catch let let if save-current-buffer progn if org-element--cache-sync if if progn if let org-element-at-point progn if] 7 [org-before-first-heading-p org-back-to-heading-or-point-min org-end-of-subtree progn unwind-protect let* save-excursion let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq] 2 [not cond let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq] 6 [while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let if if let* save-restriction save-excursion] 51 [org-element-property let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let org-element-at-point progn if] 1 [org-element-type eq if if if let* or org-element--cache-key org-element--cache-key-less-p and or and if setq if if] 13 [org-element-property and if let org-element--cache-verify-element and if let org-element-at-point progn if if if if while if] 2 [org-element-property = or if save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element and if let org-element-at-point] 18 [org-at-heading-p org-back-to-heading org-back-to-heading-or-point-min org-end-of-subtree progn unwind-protect let* save-excursion let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element] 44 [cond org-element-type let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if] 5 [org-element--current-element setq if if while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let] 62 [org-element--cache-key org-element--cache-key-less-p not or and if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map] 37 [setq let save-excursion org-element--current-element setq if if while let let* save-restriction save-excursion progn unwind-protect let catch] 1 [setq cond let* while let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to] 16 [rx--translate-counted-repetition rx--translate-repeat rx--translate-form rx--translate mapcar rx--translate-seq rx--translate-form rx--translate rx-to-string re-search-backward if progn unwind-protect let progn if] 13 [if org-element--parse-to let let progn if let org-element--cache-verify-element and if let org-element-at-point progn if if if] 14 [set-buffer save-current-buffer progn if org-element--cache-sync if if progn if let org-element-at-point progn if if if if] 2 [or set-buffer save-current-buffer progn if org-element--cache-sync if if progn if let org-element-at-point progn if if if] 2 [cons cons cons cons rx-to-string re-search-backward if progn unwind-protect let progn if cond let while let] 5 [plist-get if org-element-property car eq if or org-element--cache-key org-element--cache-key-less-p not and or if if while if] 2 [if let cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let org-element-at-point] 7 [org-get-limited-outline-regexp let* progn if cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn] 36 [rx--translate mapcar rx--translate-seq rx--translate-counted-repetition rx--translate-bounded-repetition rx--translate-repeat rx--translate-form rx--translate mapcar rx--translate-seq rx--translate-form rx--translate rx-to-string re-search-forward and if] 26 [let org-element--cache-verify-element save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element save-restriction save-excursion save-excursion let progn if] 1 [not cond org-element-type let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq] 2 [setq if if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let if if] 5 [progn unwind-protect let* save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element and if let org-element-at-point progn] 1 [cond org-element-type memq if let* or org-element--cache-key org-element--cache-key-less-p and or and if setq if if while] 13 [eq if or org-element--cache-key org-element--cache-key-less-p not and or if if while if let* save-restriction save-excursion let] 3 [plist-get if org-element-property car eq if or org-element--cache-key org-element--cache-key-less-p not or and if while if let*] 29 [if org-element-property let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if] 6 [or progn aref progn progn org-element--cache-root let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let] 6 [org-element-headline-parser setq progn if cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn] 20 [org-element-type eq if if if let* or org-element--cache-key org-element--cache-key-less-p not and or if if while if] 3 [let and let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq if if while let let*] 3 [if or org-element--cache-key org-element--cache-key-less-p not or and if while if let* save-restriction save-excursion let progn progn] 40 [unwind-protect let catch org-element--parse-to org-element-type memq if if if if while if let* save-restriction save-excursion let] 5 [org-element--cache-interrupt-p if while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let] 3 [and if setq if if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let] 11 [if org-element-property let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if if if] 4 [plist-get if org-element-property let* while let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch] 21 [org-element-property let* or org-element--cache-key org-element--cache-key-less-p not and or if if while if let* save-restriction save-excursion let] 3 [org-element-type memq if let* or org-element--cache-key org-element--cache-key-less-p not or and if while if let* save-restriction save-excursion] 31 [plist-get if org-element-property let cond let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to] 5 [eq if or org-element--cache-key org-element--cache-key-less-p not or and if while if let* save-restriction save-excursion let progn] 25 [re-search-forward if let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq if if while let let*] 9 [not cond org-element-type eq if if if let* or org-element--cache-key org-element--cache-key-less-p not or and if while] 14 [plist-get if org-element-property let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if if] 3 [progn progn setq progn if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let] 15 [memq and or progn aref progn progn org-element--headline-cache-root if setq progn if if if if while] 6 [if org-element-property > not or and if while if let* save-restriction save-excursion let progn progn let*] 22 [if org-element-property and if let org-element--cache-verify-element and if let org-element-at-point progn if if if if while] 7 [/= if save-current-buffer progn if org-element--cache-sync if if progn if let org-element-at-point progn if if if] 4 [and if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let if if let*] 35 [progn if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let if if let*] 27 [org-element--cache-key org-element--cache-key-less-p and or and if setq if if while if let* save-restriction save-excursion let progn] 13 [if org-element-property let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq] 3 [if org-element-property = or if if if while if let* save-restriction save-excursion let progn progn let*] 3 [or and if setq if if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map] 13 [plist-get if org-element-property < and or if if while if let* save-restriction save-excursion let progn progn] 4 [if setq progn if if if if while if let* save-restriction save-excursion let progn progn let*] 16 [progn setq while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let if if let*] 9 [plist-get if org-element-property <= and while let cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to] 2 [if or org-element--cache-key org-element--cache-key-less-p not and or if if while if let* save-restriction save-excursion let progn] 7 [progn progn and if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let if] 19 [if save-excursion save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if if if while] 1 [if if if let* or org-element--cache-key org-element--cache-key-less-p and or and if setq if if while if] 3 [setq while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let if if let* save-restriction] 9 [if if if let* or org-element--cache-key org-element--cache-key-less-p not or and if while if let* save-restriction save-excursion] 20 [rx--translate-seq rx--translate-counted-repetition rx--translate-bounded-repetition rx--translate-repeat rx--translate-form rx--translate mapcar rx--translate-seq rx--translate-form rx--translate rx-to-string re-search-forward and if if progn] 6 [org-element--cache-active-p and if let org-element--cache-verify-element and if let org-element-at-point progn if if if if while if] 8 [plist-get if org-element-property > not or and if while if let* save-restriction save-excursion let progn progn] 8 [cons rx-to-string re-search-forward and if if progn unwind-protect let progn if cond let while let let*] 6 [rx--enclose rx--bracket rx--atomic-regexp rx-to-string re-search-forward and if if progn unwind-protect let progn if cond let while] 27 [rx--sequence rx--translate-seq rx--translate-form rx--translate rx-to-string re-search-backward if progn unwind-protect let progn if cond let while let] 22 [if let if save-current-buffer progn if org-element--cache-sync if if progn if let org-element-at-point progn if if] 8 [not or and if let progn if let org-element--cache-verify-element and if let org-element-at-point progn if if] 9 [memq and or and org-element--cache-active-p if let org-element-at-point progn if if if if while if let*] 2 [if if setq if if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let] 7 [outline-on-heading-p org-at-heading-p let* progn cond setq let save-excursion org-element--current-element setq if if while let let* save-restriction] 3 [org-element-property car eq if or org-element--cache-key org-element--cache-key-less-p not or and if while if let* save-restriction save-excursion] 32 [progn aref progn progn org-element--cache-root let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch] 10 [rx-to-string re-search-forward and if if progn unwind-protect let progn if cond let while let let* save-restriction] 6 [if org-element-property < and or and if setq if if while if let* save-restriction save-excursion let] 6 [apply derived-mode-p org-get-limited-outline-regexp org-before-first-heading-p org-back-to-heading-or-point-min org-end-of-subtree progn unwind-protect let* save-excursion let* save-excursion org-element-headline-parser setq progn if] 3 [save-excursion let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq if if while let let* save-restriction] 19 [let cond let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn] 38 [org-element--get-node-properties let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq if if while let let* save-restriction] 36 [and or and org-element--cache-active-p if let org-element-at-point progn if if if if while if let* save-restriction] 6 [mapcar rx--translate-seq rx--translate-form rx--translate rx-to-string re-search-backward if progn unwind-protect let progn if cond let while let] 10 [progn progn org-element--headline-cache-root if setq progn if if if if while if let* save-restriction save-excursion let] 3 [catch org-element--parse-to let let progn if let org-element--cache-verify-element and if let org-element-at-point progn if if if] 1 [org-element-property or let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn if let] 1 [cond org-element-type eq if if if let* or org-element--cache-key org-element--cache-key-less-p and or and if setq if] 9 [cond org-element-type eq if if let* or org-element--cache-key org-element--cache-key-less-p not and or if if while if] 8 [org-back-to-heading org-back-to-heading-or-point-min org-end-of-subtree progn unwind-protect let* save-excursion let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq] 8 [not cond org-element-type eq if if if let* or org-element--cache-key org-element--cache-key-less-p and or and if setq] 3 [org-element-property let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let] 3 [aref progn progn org-element--cache-root let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to] 5 [or and org-element--cache-active-p and if let org-element-at-point progn if if if if while if let* save-restriction] 3 [symbolp cond org-element-type eq if if let* or org-element--cache-key org-element--cache-key-less-p not or and if while if] 9 [org-up-heading-safe org-up-heading-or-point-min progn unwind-protect let* save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element and if let] 11 [cond let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn if] 21 [memq and or progn aref progn progn org-element--cache-root let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn] 9 [org-element-property car eq if or org-element--cache-key org-element--cache-key-less-p and or and if setq if if while if] 5 [and cond let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn] 1 [apply derived-mode-p org-get-limited-outline-regexp let* progn if cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let] 3 [apply derived-mode-p and if let org-element--cache-verify-element save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element and if] 5 [1- if list nconc list let let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq if] 33 [progn if let if save-current-buffer progn if org-element--cache-sync if if progn if let org-element-at-point progn if] 11 [progn progn let* while let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to] 20 [not cond org-element-type eq if if let* or org-element--cache-key org-element--cache-key-less-p not or and if while if] 14 [if org-element-property let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let org-element-at-point] 11 [progn unwind-protect let catch org-element--parse-to let let progn if let org-element--cache-verify-element and if let org-element-at-point progn] 12 [or and org-element--cache-active-p and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let] 3 [if progn if let org-element-at-point progn if if if if while if let* save-restriction save-excursion let] 9 [symbolp cond org-element-type let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if] 2 [org-element-property <= and while let cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if] 2 [plist-get if org-element-property let* or org-element--cache-key org-element--cache-key-less-p not and or if if while if let* save-restriction] 4 [org-element-property > not or and if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map] 10 [if org-element-property let* or org-element--cache-key org-element--cache-key-less-p and or and if setq if if while if let*] 12 [progn if save-excursion org-element--get-time-properties let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq if if while] 1 [org-element-type eq if if let* or org-element--cache-key org-element--cache-key-less-p and or and if setq if if while] 12 [let cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let org-element-at-point progn] 8 [if org-element--cache-key-less-p and or and if setq if if while if let* save-restriction save-excursion let progn] 8 [not cond let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if] 5 [if if org-element--cache-key-less-p not or and if while if let* save-restriction save-excursion let progn progn let*] 31 [org-element-property let* while let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type] 12 [not cond org-element-type eq if if let* or org-element--cache-key org-element--cache-key-less-p and or and if setq if] 2 [progn if if setq if if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map] 5 [org-get-limited-outline-regexp let* progn cond setq let save-excursion org-element--current-element setq if if while let let* save-restriction save-excursion] 12 [progn if save-excursion org-element--get-time-properties let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion progn unwind-protect] 2 [let org-element-at-point progn if if if if while if let* save-restriction save-excursion let progn progn let*] 5 [plist-get if org-element-property car eq if or org-element--cache-key org-element--cache-key-less-p and or and if setq if if] 4 [org-before-first-heading-p org-back-to-heading-or-point-min org-end-of-subtree progn unwind-protect let* save-excursion let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction] 3 [throw cond let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if] 5 [progn progn setq cond let* while let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let] 25 [aref progn progn org-element-property < and or and if setq if if while if let* save-restriction] 2 [progn let* while let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type] 14 [plist-get if org-element-property let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let] 2 [not cond org-element-type let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if] 1 [cond org-element-type memq if if if if while if let* save-restriction save-excursion let progn progn let*] 4 [org-back-to-heading org-up-heading-or-point-min progn unwind-protect let* save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element and if let] 1 [if let cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if if] 7 [derived-mode-p and org-element--cache-active-p and if let org-element--cache-verify-element and if let org-element-at-point progn if if if if] 1 [memq and or and org-element--cache-active-p and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if] 1 [org-element-property let* or org-element--cache-key org-element--cache-key-less-p and or and if setq if if while if let* save-restriction] 7 [cond org-element-type let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq] 6 [org-element--cache-verify-element and if let org-element-at-point progn if if if if while if let* save-restriction save-excursion let] 11 [and cond let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq] 7 [org-element-property let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if if if while] 2 [org-element--cache-sync if if progn if let org-element-at-point progn if if if if while if let* save-restriction] 4 [if let org-element--cache-verify-element and if let org-element-at-point progn if if if if while if let* save-restriction] 16 [outline-previous-heading let* progn if cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn] 4 [progn setq progn if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let if] 6 [org-element-property let* while let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case] 10 [symbolp cond org-element-type eq and if let org-element--cache-verify-element and if let org-element-at-point progn if if if] 1 [save-current-buffer progn if org-element--cache-sync if if progn if let org-element-at-point progn if if if if while] 3 [if org-element-property <= and while let cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case] 1 [cond org-element-type memq if let* or org-element--cache-key org-element--cache-key-less-p not and or if if while if let*] 6 [org-outline-level org-up-heading-or-point-min progn unwind-protect let* save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element and if let] 1 [and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn if let org-element--cache-verify-element and] 5 [org-back-to-heading org-back-to-heading-or-point-min org-end-of-subtree progn unwind-protect let* save-excursion let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction] 5 [if if while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn if] 39 [mapcar rx--translate-seq rx--translate-counted-repetition rx--translate-repeat rx--translate-form rx--translate mapcar rx--translate-seq rx--translate-form rx--translate rx-to-string re-search-backward if progn unwind-protect let] 8 [if org-element-property <= and while let cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type] 3 [symbolp cond org-element-type let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq] 2 [and or and org-element--cache-active-p and if let org-element-at-point progn if if if if while if let*] 7 [cons cons cons cons cons rx-to-string re-search-forward and if if progn unwind-protect let progn if cond] 5 [symbolp cond org-element-type eq if if if let* or org-element--cache-key org-element--cache-key-less-p and or and if setq] 2 [progn let* while let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case] 10 [let* save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element and if let org-element-at-point progn if if] 7 [not and if let org-element--cache-verify-element and if let org-element-at-point progn if if if if while if] 4 [cond setq let save-excursion org-element--current-element setq if if while let let* save-restriction save-excursion progn unwind-protect let] 23 [plist-get if org-element-property let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let org-element-at-point] 4 [cons cons cons cons rx-to-string re-search-forward and if if progn unwind-protect let progn if cond let] 4 [let* save-excursion let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq if if while let let*] 11 [rx--translate mapcar rx--translate-seq rx--translate-form rx--translate rx-to-string re-search-backward if progn unwind-protect let progn if cond let while] 7 [let progn if let org-element--cache-verify-element save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element and if let] 2 [if org-element-property let cond let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case] 9 [cons cons rx-to-string re-search-forward and if if progn unwind-protect let progn if cond let while let] 3 [symbolp cond org-element-type memq not and if let org-element--cache-verify-element and if let org-element-at-point progn if if] 2 [progn progn if if setq if if while if let* save-restriction save-excursion let progn progn let*] 4 [org-element-type eq if let org-element-at-point progn if if if if while if let* save-restriction save-excursion let] 2 [and while let cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if] 3 [not cond org-element-type let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let] 1 [if org-element--parse-to let let progn if let org-element--cache-verify-element save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element] 1 [org-element-type memq not and if let org-element--cache-verify-element and if let org-element-at-point progn if if if if] 4 [plist-get if org-element-property let* or org-element--cache-key org-element--cache-key-less-p and or and if setq if if while if] 6 [cond org-element-type eq not if if if let org-element-at-point progn if if if if while if] 4 [if if if let org-element-at-point progn if if if if while if let* save-restriction save-excursion let] 2 [if if let org-element-at-point progn if if if if while if let* save-restriction save-excursion let progn] 6 [symbolp cond org-element-type eq if if let* or org-element--cache-key org-element--cache-key-less-p not and or if if while] 1 [org-element-property < and or and if setq if if while if let* save-restriction save-excursion let progn] 7 [if let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to] 3 [derived-mode-p and org-element--cache-active-p and if let org-element--cache-verify-element save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element and] 1 [if org-element--cache-key-less-p not and or if if while if let* save-restriction save-excursion let progn progn let*] 3 [org-element--cache-key org-element--cache-key-less-p not and or if if while if let* save-restriction save-excursion let progn progn let*] 4 [and let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to] 2 [org-element-property < and or if if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map] 6 [progn if let cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if] 2 [if org-element-property let* or org-element--cache-key org-element--cache-key-less-p not and or if if while if let* save-restriction save-excursion] 4 [re-search-forward and if if progn unwind-protect let progn if cond let while let let* save-restriction save-excursion] 2 [if let* or org-element--cache-key org-element--cache-key-less-p not and or if if while if let* save-restriction save-excursion let] 7 [org-element-property <= and while let cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq] 2 [if if if if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map let if] 6 [setcar if org-element-put-property let let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq if if while] 6 [or setq if if while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let] 15 [org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let org-element-at-point progn] 8 [and cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn if let org-element--cache-verify-element] 5 [progn progn org-element--cache-root let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type] 3 [let and let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion progn unwind-protect let catch] 6 [let cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if if if] 6 [if if org-element--cache-key-less-p and or and if setq if if while if let* save-restriction save-excursion let] 6 [org-get-limited-outline-regexp org-before-first-heading-p org-back-to-heading-or-point-min org-end-of-subtree progn unwind-protect let* save-excursion let* save-excursion org-element-headline-parser setq progn if cond let*] 19 [apply derived-mode-p org-get-limited-outline-regexp org-before-first-heading-p org-back-to-heading-or-point-min org-end-of-subtree progn unwind-protect let* save-excursion let* save-excursion org-element-headline-parser cond setq let] 4 [org-element-type eq if if let* or org-element--cache-key org-element--cache-key-less-p not and or if if while if let*] 4 [progn progn org-element-property < and or and if setq if if while if let* save-restriction save-excursion] 3 [let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn if let org-element--cache-verify-element save-restriction save-excursion] 1 [and let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq if if while let let* save-restriction] 4 [memq not and if let org-element--cache-verify-element save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element and if] 6 [org-element--cache-active-p and if let org-element-at-point progn if if if if while if let* save-restriction save-excursion let] 1 [if if org-element--cache-key-less-p not and or if if while if let* save-restriction save-excursion let progn progn] 5 [setq org-element-at-point progn if if if if while if let* save-restriction save-excursion let progn progn let*] 2 [progn if let cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let] 3 [setq let org-element-at-point progn if if if if while if let* save-restriction save-excursion let progn progn] 2 [cond org-element-type eq if if let* or org-element--cache-key org-element--cache-key-less-p and or and if setq if if] 7 [org-element-type memq if let* or org-element--cache-key org-element--cache-key-less-p not and or if if while if let* save-restriction] 4 [memq and or and org-element--cache-active-p and if let org-element-at-point progn if if if if while if] 1 [if org-element-property let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let org-element-at-point progn] 5 [cancel-timer progn if let if save-current-buffer progn if org-element--cache-sync if if progn if let org-element-at-point progn] 6 [progn org-element--cache-key org-element--cache-key-less-p and or and if setq if if while if let* save-restriction save-excursion let] 2 [if if save-excursion org-element--get-node-properties let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion progn unwind-protect] 1 [and if if progn unwind-protect let progn if cond let while let let* save-restriction save-excursion progn] 3 [save-excursion save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn if let org-element--cache-verify-element and if] 14 [cond org-element-type eq and if let org-element--cache-verify-element and if let org-element-at-point progn if if if if] 4 [rx--translate-form rx--translate rx-to-string re-search-forward and if if progn unwind-protect let progn if cond let while let] 1 [if progn unwind-protect let progn if cond let while let let* save-restriction save-excursion progn unwind-protect let] 3 [let* save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element save-restriction save-excursion save-excursion let progn if let] 1 [and cond let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if] 3 [if org-element-property and if let org-element--cache-verify-element save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element and if] 1 [plist-get if org-element-property = or if if if while if let* save-restriction save-excursion let progn progn] 1 [if or org-element--cache-key org-element--cache-key-less-p and or and if setq if if while if let* save-restriction save-excursion] 10 [save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if if if while if let* save-restriction] 5 [and or progn aref progn progn org-element--headline-cache-root if setq progn if if if if while if] 4 [progn if let org-element-at-point progn if if if if while if let* save-restriction save-excursion let progn] 3 [org-reduced-level prog1 let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion progn unwind-protect let catch] 1 [if org-element-property let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if if] 6 [rx-to-string re-search-backward if progn unwind-protect let progn if cond let while let let* save-restriction save-excursion progn] 2 [rx--bracket rx--atomic-regexp rx-to-string re-search-forward and if if progn unwind-protect let progn if cond let while let] 6 [if save-excursion save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let org-element-at-point progn if] 1 [/= and cond let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let] 1 [symbolp cond org-element-type eq if if if let* or org-element--cache-key org-element--cache-key-less-p not and or if if] 2 [org-element--cache-active-p if let org-element-at-point progn if if if if while if let* save-restriction save-excursion let progn] 5 [cond org-element-type eq if if if let* or org-element--cache-key org-element--cache-key-less-p not and or if if while] 4 [org-element-property let cond let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if] 3 [or set-buffer save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq] 2 [derived-mode-p and if let org-element--cache-verify-element and if let org-element-at-point progn if if if if while if] 1 [progn unwind-protect let catch org-element--parse-to let let progn if let org-element--cache-verify-element save-restriction save-excursion save-excursion let progn] 1 [cons rx-to-string re-search-backward if progn unwind-protect let progn if cond let while let let* save-restriction save-excursion] 3 [org-element--cache-root let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if] 5 [symbolp cond org-element-type memq if let* or org-element--cache-key org-element--cache-key-less-p and or and if setq if if] 5 [if org-element--cache-put or setq if if while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to] 3 [rx--translate-form rx--translate mapcar rx--translate-seq rx--translate-form rx--translate rx-to-string re-search-forward and if if progn unwind-protect let progn if] 2 [if let cond let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if] 3 [org-element-property let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn if let org-element--cache-verify-element] 1 [timerp cancel-timer progn if let if save-current-buffer progn if org-element--cache-sync if if progn if let org-element-at-point] 3 [org-element-type let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if] 2 [not cond org-element-type eq not if if if let org-element-at-point progn if if if if while] 1 [org-element-type memq if let* or org-element--cache-key org-element--cache-key-less-p and or and if setq if if while if] 9 [or and org-element--cache-active-p and if let org-element--cache-verify-element and if let org-element-at-point progn if if if if] 2 [if org-element-property let cond let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type] 3 [aref progn progn org-element--headline-cache-root if setq progn if if if if while if let* save-restriction save-excursion] 1 [org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if if if] 2 [plist-get if org-element-property < and or and if setq if if while if let* save-restriction save-excursion] 1 [eq if or org-element--cache-key org-element--cache-key-less-p and or and if setq if if while if let* save-restriction] 2 [outline-on-heading-p org-at-heading-p org-back-to-heading org-up-heading-or-point-min progn unwind-protect let* save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element and] 1 [if org-element-property or let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let] 3 [org-element-type let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let] 2 [progn progn setq if if setq if if while if let* save-restriction save-excursion let progn progn] 4 [or and org-element--cache-active-p and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if] 3 [cons cons cons rx-to-string re-search-backward if progn unwind-protect let progn if cond let while let let*] 2 [org-element--headline-cache-root if setq progn if if if if while if let* save-restriction save-excursion let progn progn] 2 [cond let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq] 2 [outline-on-heading-p org-at-heading-p org-back-to-heading org-back-to-heading-or-point-min org-end-of-subtree progn unwind-protect let* save-excursion let* save-excursion org-element-headline-parser setq progn if cond] 1 [if org-element--cache-sync if if progn if let org-element-at-point progn if if if if while if let*] 2 [rx--translate-repeat rx--translate-form rx--translate mapcar rx--translate-seq rx--translate-form rx--translate rx-to-string re-search-forward and if if progn unwind-protect let progn] 1 [symbolp cond org-element-type memq if let* or org-element--cache-key org-element--cache-key-less-p not and or if if while if] 1 [apply derived-mode-p org-get-limited-outline-regexp let* progn cond setq let save-excursion org-element--current-element setq if if while let let*] 3 [if list nconc list let let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq if if] 5 [progn progn org-element--cache-key org-element--cache-key-less-p and or and if setq if if while if let* save-restriction save-excursion] 4 [org-up-heading-or-point-min progn unwind-protect let* save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element save-restriction save-excursion save-excursion let] 2 [progn progn org-element--cache-root let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case] 1 [set-match-data unwind-protect let catch org-element--parse-to org-element-type memq if if if if while if let* save-restriction save-excursion] 2 [plist-get if org-element-property or let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if] 1 [fset unwind-protect let* save-excursion let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq if if while] 1 [save-excursion if if while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn] 1 [progn org-element--headline-cache-root if setq progn if if if if while if let* save-restriction save-excursion let progn] 1 [plist-get if org-element-property let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq] 1 [aref progn progn org-element--cache-key org-element--cache-key-less-p and or and if setq if if while if let* save-restriction] 1 [progn aref progn progn org-element--headline-cache-root if setq progn if if if if while if let* save-restriction] 1 [if save-excursion org-element--get-node-properties let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion progn unwind-protect let] 2 [cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn if let org-element--cache-verify-element save-restriction] 1 [if save-excursion org-element--get-node-properties let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq if if while let] 2 [org-element--cache-interrupt-p if while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if] 1 [unwind-protect let catch org-element--parse-to condition-case if setq let org-element-at-point progn if if if if while if] 3 [cond org-element-type memq not and if let org-element--cache-verify-element and if let org-element-at-point progn if if if] 1 [plist-get if org-element-property = or if save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element and if] 1 [eq cond let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if] 2 [derived-mode-p and org-element--cache-active-p and if let org-element-at-point progn if if if if while if let* save-restriction] 2 [save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let org-element-at-point progn if if if if] 1 [cond let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if] 3 [org-element-property eq and if let progn if let org-element--cache-verify-element and if let org-element-at-point progn if if] 1 [catch org-element--parse-to let let progn if let org-element--cache-verify-element save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element] 1 [setq if if setq if if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map] 3 [throw cond let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq] 2 [apply derived-mode-p org-end-of-subtree progn unwind-protect let* save-excursion let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction] 1 [cons cons cons rx-to-string re-search-forward and if if progn unwind-protect let progn if cond let while] 5 [org-element--parse-to condition-case if setq let org-element-at-point progn if if if if while if let* save-restriction save-excursion] 2 [and cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if if if] 1 [org-element-property = or if if if while if let* save-restriction save-excursion let progn progn let* org-element-cache-map] 1 [org-element-type eq not if if if let org-element-at-point progn if if if if while if let*] 1 [prog1 let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to] 2 [org-outline-level org-end-of-subtree progn unwind-protect let* save-excursion let* save-excursion org-element-headline-parser setq progn if cond let* save-restriction save-excursion] 3 [while let cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq let org-element-at-point] 4 [plist-get if org-element-property and if let org-element--cache-verify-element and if let org-element-at-point progn if if if if] 1 [if org-element-property or let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if] 2 [symbolp cond org-element-type memq if if if if while if let* save-restriction save-excursion let progn progn] 2 [not cond org-element-type eq if if let* or org-element--cache-key org-element--cache-key-less-p not and or if if while] 3 [not or and if let progn if let org-element--cache-verify-element save-restriction save-excursion save-excursion let progn if let] 1 [org-element--cache-root let save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to condition-case if setq] 1 [symbolp cond org-element-type eq if if let* or org-element--cache-key org-element--cache-key-less-p and or and if setq if] 2 [prog1 let* save-excursion org-element-headline-parser cond setq let save-excursion org-element--current-element setq if if while let let* save-restriction] 1 [if let org-element--cache-verify-element save-restriction save-excursion save-excursion let progn if let org-element--cache-verify-element and if let org-element-at-point progn] 1 [org-element-property let cond let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq] 1 [not cond org-element-type memq if let* or org-element--cache-key org-element--cache-key-less-p not and or if if while if] 1 [set-buffer save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if] 1 [org-element-property let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if if if] 2 [let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn if let org-element--cache-verify-element save-restriction] 1 [while let cond let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if if] 1 [cond org-element-type let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let progn] 1 [or set-buffer save-current-buffer org-element--cache-find and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if] 1 [org-element--cache-active-p and let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to org-element-type memq if if if if] 1 [not cond org-element-type memq if let* or org-element--cache-key org-element--cache-key-less-p and or and if setq if if] 1 [symbolp cond org-element-type eq and if let progn if let org-element--cache-verify-element and if let org-element-at-point progn] 1 [setq if let if save-current-buffer progn if org-element--cache-sync if if progn if let org-element-at-point progn if] 1 [symbolp cond org-element-type let while let let* save-restriction save-excursion progn unwind-protect let catch org-element--parse-to let let] 1 [progn org-element-property < and or and if setq if if while if let* save-restriction save-excursion let] 1 [doom-modeline-segment--buffer-position eval redisplay_internal\ \(C\ function\) nil nil nil nil nil nil nil nil nil nil nil nil nil] 1 [helm-source--persistent-help-string "#<compiled 0x1ff11f62ad55>" apply "#<compiled 0x1ff11e3f30a5>" apply helm--setup-source helm-make-source helm-M-x-read-extended-command helm-M-x funcall-interactively call-interactively command-execute nil nil nil nil] 1 [helm-comp-read-get-candidates "#<compiled 0x1ff11ee1d4c9>" "#<compiled 0x1ff11f6329f1>" apply helm-apply-functions-from-source helm-compute-attr-in-sources helm-initial-setup helm-initialize helm-internal apply helm apply helm helm-M-x-read-extended-command helm-M-x funcall-interactively] 3 ["#<compiled 0x1ff11f6329f1>" apply helm-apply-functions-from-source helm-compute-attr-in-sources helm-initial-setup helm-initialize helm-internal apply helm apply helm helm-M-x-read-extended-command helm-M-x funcall-interactively call-interactively command-execute] 1 [helm-init-candidates-in-buffer "#<compiled 0x1ff11f6329f1>" apply helm-apply-functions-from-source helm-compute-attr-in-sources helm-initial-setup helm-initialize helm-internal apply helm apply helm helm-M-x-read-extended-command helm-M-x funcall-interactively call-interactively] 1 [let* +popup-display-buffer-stacked-side-window-fn funcall let progn and while let* and let* or let* +popup-buffer display-buffer helm-default-display-buffer helm-display-buffer] 1 [helm-M-x-transformer-1 helm-M-x-transformer-no-sort apply helm-apply-functions-from-source helm-process-filtered-candidate-transformer helm-compute-matches helm--collect-matches helm-update helm-read-from-minibuffer helm-internal apply helm apply helm helm-M-x-read-extended-command helm-M-x] 1 [helm-internal apply helm apply helm helm-M-x-read-extended-command helm-M-x funcall-interactively call-interactively command-execute nil nil nil nil nil nil] 1 [read-from-minibuffer helm-read-from-minibuffer helm-internal apply helm apply helm helm-M-x-read-extended-command helm-M-x funcall-interactively call-interactively command-execute nil nil nil nil] 29 [helm-read-from-minibuffer helm-internal apply helm apply helm helm-M-x-read-extended-command helm-M-x funcall-interactively call-interactively command-execute nil nil nil nil nil] 361 ["#<compiled 0x1ff11f756785>" helm--search-from-candidate-buffer-1 helm-search-from-candidate-buffer helm-candidates-in-buffer-1 helm-candidates-in-buffer apply helm-apply-functions-from-source helm-interpret-value helm-get-candidates helm-get-cached-candidates helm-compute-matches helm--collect-matches helm-update helm-check-new-input helm-check-minibuffer-input "#<compiled 0x1ff11db30631>"] 1 ["#<compiled 0x41ff0eab>" split-string helm-score-candidate-for-pattern "#<compiled 0x1ff11f993861>" sort helm-fuzzy-matching-default-sort-fn-1 "#<compiled 0x1ff11f6acc49>" apply helm-apply-functions-from-source helm-process-filtered-candidate-transformer helm-compute-matches helm--collect-matches helm-update helm-check-new-input helm-check-minibuffer-input "#<compiled 0x1ff11db30631>"] 1 [doom-protect-fallback-buffer-h kill-buffer "#<compiled 0x1ff11f022d25>" helm-fuzzy-default-highlight-match helm-fuzzy-highlight-matches apply helm-apply-functions-from-source helm-process-filtered-candidate-transformer helm-compute-matches helm--collect-matches helm-update helm-check-new-input helm-check-minibuffer-input "#<compiled 0x1ff11db30631>" apply timer-event-handler] 1 [generate-new-buffer helm-fuzzy-default-highlight-match helm-fuzzy-highlight-matches apply helm-apply-functions-from-source helm-process-filtered-candidate-transformer helm-compute-matches helm--collect-matches helm-update helm-check-new-input helm-check-minibuffer-input "#<compiled 0x1ff11db30631>" apply timer-event-handler read-from-minibuffer helm-read-from-minibuffer] 1 [replace-buffer-in-windows kill-buffer "#<compiled 0x1ff1205aa711>" helm-fuzzy-default-highlight-match helm-fuzzy-highlight-matches apply helm-apply-functions-from-source helm-process-filtered-candidate-transformer helm-compute-matches helm--collect-matches helm-update helm-check-new-input helm-check-minibuffer-input "#<compiled 0x1ff11db30631>" apply timer-event-handler] 1 [helm-update helm-check-new-input helm-check-minibuffer-input "#<compiled 0x1ff11db30631>" apply timer-event-handler read-from-minibuffer helm-read-from-minibuffer helm-internal apply helm apply helm helm-M-x-read-extended-command helm-M-x funcall-interactively] 1 [cl--map-keymap-recursively helm-M-x-get-major-mode-command-alist helm-M-x-current-mode-map-alist helm-M-x-transformer-1 helm-M-x-transformer-no-sort apply helm-apply-functions-from-source helm-process-filtered-candidate-transformer helm-compute-matches helm--collect-matches helm-update helm-check-new-input helm-check-minibuffer-input "#<compiled 0x1ff11db30631>" apply timer-event-handler] 1 [run-hook-with-args-until-success not or and progn if let* doom-real-buffer-p or doom-buffer-frame-predicate "#<compiled 0x1ff11d81578d>" kill-buffer "#<compiled 0x1ff11e5692e1>" helm-fuzzy-default-highlight-match helm-fuzzy-highlight-matches apply] 1 [funcall condition-case doom-run-hook run-hook-wrapped condition-case let while let doom-run-hooks apply run-hooks kill-buffer "#<compiled 0x1ff11f1f3ffd>" helm-fuzzy-default-highlight-match helm-fuzzy-highlight-matches apply] 1 [hide-mode-line-mode if save-current-buffer +helm--hide-mode-line apply helm-display-mode-line helm-move-selection-common helm--update-move-first-line helm-update helm-check-new-input helm-check-minibuffer-input "#<compiled 0x1ff11db30631>" apply timer-event-handler read-from-minibuffer helm-read-from-minibuffer] 1 [helm-fuzzy-search "#<compiled 0x1ff11f7547e5>" helm--search-from-candidate-buffer-1 helm-search-from-candidate-buffer helm-candidates-in-buffer-1 helm-candidates-in-buffer apply helm-apply-functions-from-source helm-interpret-value helm-get-candidates helm-get-cached-candidates helm-compute-matches helm--collect-matches helm-update helm-check-new-input helm-check-minibuffer-input] 20 [helm-mm-3-search-base helm-mm-3-search helm-mm-search "#<compiled 0x1ff11fb8e391>" helm--search-from-candidate-buffer-1 helm-search-from-candidate-buffer helm-candidates-in-buffer-1 helm-candidates-in-buffer apply helm-apply-functions-from-source helm-interpret-value helm-get-candidates helm-get-cached-candidates helm-compute-matches helm--collect-matches helm-update] 2 [helm-fuzzy-highlight-matches apply helm-apply-functions-from-source helm-process-filtered-candidate-transformer helm-compute-matches helm--collect-matches helm-update helm-check-new-input helm-check-minibuffer-input "#<compiled 0x1ff11db30631>" apply timer-event-handler read-from-minibuffer helm-read-from-minibuffer helm-internal apply] 1 [funcall condition-case doom-run-hook run-hook-wrapped condition-case let while let doom-run-hooks apply run-hooks get-buffer-create generate-new-buffer helm-fuzzy-default-highlight-match helm-fuzzy-highlight-matches apply] 2 [persp--buffer-in-persps persp-kill-buffer-h kill-buffer "#<compiled 0x1ff11f8a1c91>" helm-fuzzy-default-highlight-match helm-fuzzy-highlight-matches apply helm-apply-functions-from-source helm-process-filtered-candidate-transformer helm-compute-matches helm--collect-matches helm-update helm-check-new-input helm-check-minibuffer-input "#<compiled 0x1ff11db30631>" apply] 1 ["#<compiled 0x1ff11d811199>" "#<compiled 0x1ff11e2cd335>" map-keymap cl--map-keymap-recursively "#<compiled 0x1ff11d7e6221>" map-keymap cl--map-keymap-recursively "#<compiled 0x1ff11d815701>" map-keymap cl--map-keymap-recursively helm-M-x-get-major-mode-command-alist helm-M-x-current-mode-map-alist helm-M-x-transformer-1 helm-M-x-transformer-no-sort apply helm-apply-functions-from-source] 1 [helm-score-candidate-for-pattern "#<compiled 0x1ff11e694785>" sort helm-fuzzy-matching-default-sort-fn-1 "#<compiled 0x1ff11f6acc49>" apply helm-apply-functions-from-source helm-process-filtered-candidate-transformer helm-compute-matches helm--collect-matches helm-update helm-check-new-input helm-check-minibuffer-input "#<compiled 0x1ff11db30631>" apply timer-event-handler] 2 ["#<compiled 0x1ff11ee32241>" map-keymap cl--map-keymap-recursively helm-M-x-get-major-mode-command-alist helm-M-x-current-mode-map-alist helm-M-x-transformer-1 helm-M-x-transformer-no-sort apply helm-apply-functions-from-source helm-process-filtered-candidate-transformer helm-compute-matches helm--collect-matches helm-update helm-check-new-input helm-check-minibuffer-input "#<compiled 0x1ff11db30631>"] 1 [let* progn if let* doom-real-buffer-p or doom-buffer-frame-predicate "#<compiled 0x1ff11d81578d>" kill-buffer "#<compiled 0x1ff11ee9004d>" helm-fuzzy-default-highlight-match helm-fuzzy-highlight-matches apply helm-apply-functions-from-source helm-process-filtered-candidate-transformer helm-compute-matches] 1 [helm-M-x-get-major-mode-command-alist helm-M-x-current-mode-map-alist helm-M-x-transformer-1 helm-M-x-transformer-no-sort apply helm-apply-functions-from-source helm-process-filtered-candidate-transformer helm-compute-matches helm--collect-matches helm-update helm-check-new-input helm-check-minibuffer-input "#<compiled 0x1ff11db30631>" apply timer-event-handler read-from-minibuffer] 1 [helm-M-x-transformer-1 helm-M-x-transformer-no-sort apply helm-apply-functions-from-source helm-process-filtered-candidate-transformer helm-compute-matches helm--collect-matches helm-update helm-check-new-input helm-check-minibuffer-input "#<compiled 0x1ff11db30631>" apply timer-event-handler read-from-minibuffer helm-read-from-minibuffer helm-internal] 2 [helm-fuzzy-default-highlight-match helm-fuzzy-highlight-matches apply helm-apply-functions-from-source helm-process-filtered-candidate-transformer helm-compute-matches helm--collect-matches helm-update helm-check-new-input helm-check-minibuffer-input "#<compiled 0x1ff11db30631>" apply timer-event-handler read-from-minibuffer helm-read-from-minibuffer helm-internal] 1 [+magit-buffer-p run-hook-with-args-until-success or and progn if let* doom-real-buffer-p or doom-buffer-frame-predicate "#<compiled 0x1ff11d81578d>" kill-buffer "#<compiled 0x1ff11fe92639>" helm-fuzzy-default-highlight-match helm-fuzzy-highlight-matches apply] 1 [apply derived-mode-p and save-current-buffer +magit-buffer-p run-hook-with-args-until-success or and progn if let* doom-real-buffer-p or doom-buffer-frame-predicate "#<compiled 0x1ff11d81578d>" kill-buffer] 1 [apply cl-intersection apply cl-nintersection helm-score-candidate-for-pattern "#<compiled 0x1ff11d46dd11>" sort helm-fuzzy-matching-default-sort-fn-1 "#<compiled 0x1ff11f6acc49>" apply helm-apply-functions-from-source helm-process-filtered-candidate-transformer helm-compute-matches helm--collect-matches helm-update helm-check-new-input] 1 [helm-insert-match helm-render-source helm-update helm-check-new-input helm-check-minibuffer-input "#<compiled 0x1ff11db30631>" apply timer-event-handler read-from-minibuffer helm-read-from-minibuffer helm-internal apply helm apply helm helm-M-x-read-extended-command] 1 ["#<compiled 0x4200381f>" redisplay--update-region-highlight run-hook-with-args redisplay--pre-redisplay-functions apply "#<compiled 0x42158e59>" redisplay_internal\ \(C\ function\) read-from-minibuffer helm-read-from-minibuffer helm-internal apply helm apply helm helm-M-x-read-extended-command helm-M-x] 2 [select-frame-set-input-focus helm-frame-or-window-configuration helm-cleanup "#<compiled 0x1ff11f168ff1>" helm-internal apply helm apply helm helm-M-x-read-extended-command helm-M-x funcall-interactively call-interactively command-execute nil nil] 1 [profiler-report funcall-interactively call-interactively command-execute helm-M-x-execute-command helm-execute-selection-action-1 helm-execute-selection-action helm-internal apply helm apply helm helm-M-x-read-extended-command helm-M-x funcall-interactively call-interactively] 1 [Automatic\ GC] 238024)) (24961 50047 823782 0) nil]