From: David Conner <aionfork@gmail.com>
To: emacs-orgmode@gnu.org
Subject: [BUG] (Doom) Consistently seeing "org-element--cache" problems [9.6
 (9.6-??-0c9b30e @
 /home/dc/.emacs.doom/.local/straight/build-28.0.90/org/)]
Date: Thu, 27 Jan 2022 22:59:37 -0500
Message-ID: <87y230se6u.fsf@gmail.com>
--text follows this line--

Remember to cover the basics, that is, what you expected to happen and
what in fact did happen.  You don't know how to make a good report?  See

     https://orgmode.org/manual/Feedback.html#Feedback

Your bug report will be posted to the Org mailing list.
------------------------------------------------------------------------

I was shuffling around the headlines in a newly created org file. The
error message showed up when I demoted the last headlines under the
"Notes" headline.

Here is the org content:

```org
#+TITLE:     HW 2
#+AUTHOR:    David Conner
#+EMAIL:     aionfork@gmail.com
#+DESCRIPTION: notes

* Cards

** What are the fourt major types of materials?

** What properties of materials make them useful?

** Why are alloys used?

** What's the difference between ferrous and nonferrous alloys?

** What are the primary variables influencing steel classification?

** List some advantages of:
+ tool steels
+ plastics
+ ceramics
+ composites

** List some common uses for:
+ plastics
+ ceramics
+ composites

** Describe the relative importance of the four different types of materials

* Notes

** Steels
+ Est: 2,000 types

** Plastics
+ Est: 5,000 types

** Ceramics

** Glass
+ Est: 10,000 types

** Composites
```

I have also had issues with detangling recently, where it reports that
it is "not in a babel block", but is searching between completely
arbitrary characters for the current block. In my literate .doom.d
config.el & config.org, this always occurs at the same block. I'm unsure
whether this is related.

Emacs  : GNU Emacs 28.0.90 (build 1, x86_64-pc-linux-gnu, GTK+ Version 3.24.30, cairo version 1.16.0)
Package: Org mode version 9.6 (9.6-??-0c9b30e @ /home/dc/.emacs.doom/.local/straight/build-28.0.90/org/)

current state:
==============
(setq
 org-roam-db-location "/data/org/roam/org-roam.db"
 org-link-elisp-confirm-function nil
 org-directory "/data/org"
 org-after-refile-insert-hook '(save-buffer)
 org-indirect-buffer-display 'current-window
 org-roam-db-gc-threshold 2305843009213693951
 org-crypt-key nil
 org-bibtex-headline-format-function #[257 "\300%1\236A\207" [:title] 3 "\n\n(fn ENTRY)"]
 org-log-done 'time
 org-roam-mode-hook '(turn-on-visual-line-mode)
 org-load-hook '(+org-init-org-directory-h +org-init-appearance-h +org-init-agenda-h +org-init-attachments-h
                 +org-init-babel-h +org-init-babel-lazy-loader-h +org-init-capture-defaults-h +org-init-capture-frame-h
                 +org-init-custom-links-h +org-init-export-h +org-init-habit-h +org-init-hacks-h +org-init-keybinds-h
                 +org-init-popup-rules-h +org-init-protocol-h +org-init-protocol-lazy-loader-h +org-init-smartparens-h
                 +org-init-roam-h)
 org-roam-extract-new-file-path "${slug}-%<%Y%m%d%H%M%S>-.org"
 org-startup-folded nil
 org-babel-after-execute-hook '(org-redisplay-inline-images)
 org-link-abbrev-alist '(("doom-repo" . "https://github.com/hlissner/doom-emacs/%s")
                         ("wolfram" . "https://wolframalpha.com/input/?i=%s")
                         ("wikipedia" . "https://en.wikipedia.org/wiki/%s") ("duckduckgo" . "https://duckduckgo.com/?q=%s")
                         ("gmap" . "https://maps.google.com/maps?q=%s") ("gimages" . "https://google.com/images?q=%s")
                         ("google" . "https://google.com/search?q=") ("youtube" . "https://youtube.com/watch?v=%s")
                         ("github" . "https://github.com/%s"))
 org-agenda-files '("/data/org/roam/dailies/")
 org-capture-templates '(("t" "Personal todo" entry (file+headline +org-capture-todo-file "Inbox") "* [ ] %?\n%i\n%a"
                          :prepend t)
                         ("n" "Personal notes" entry (file+headline +org-capture-notes-file "Inbox") "* %u %?\n%i\n%a"
                          :prepend t)
                         ("j" "Journal" entry (file+olp+datetree +org-capture-journal-file) "* %U %?\n%i\n%a" :prepend t)
                         ("p" "Templates for projects")
                         ("pt" "Project-local todo" entry (file+headline +org-capture-project-todo-file "Inbox")
                          "* TODO %?\n%i\n%a" :prepend t)
                         ("pn" "Project-local notes" entry (file+headline +org-capture-project-notes-file "Inbox")
                          "* %U %?\n%i\n%a" :prepend t)
                         ("pc" "Project-local changelog" entry
                          (file+headline +org-capture-project-changelog-file "Unreleased") "* %U %?\n%i\n%a" :prepend t)
                         ("o" "Centralized templates for projects")
                         ("ot" "Project todo" entry #'+org-capture-central-project-todo-file "* TODO %?\n %i\n %a" :heading
                          "Tasks" :prepend nil)
                         ("on" "Project notes" entry #'+org-capture-central-project-notes-file "* %U %?\n %i\n %a" :heading
                          "Notes" :prepend t)
                         ("oc" "Project changelog" entry #'+org-capture-central-project-changelog-file "* %U %?\n %i\n %a"
                          :heading "Changelog" :prepend t)
                         )
 org-roam-node-display-template "${doom-hierarchy:*} ${doom-tags:45}"
 org-persist-after-read-hook '(org-element--cache-persist-after-read)
 org-refile-targets '((org-agenda-files :maxlevel . 2) (("./todo.org" "./notes.org") :maxlevel . 3) (nil :maxlevel . 2))
 org-export-before-parsing-hook '(org-attach-expand-links)
 org-default-notes-file "/home/dc/org/notes.org"
 org-roam-find-file-hook '(doom--setq-org-id-link-to-org-use-id-for-org-roam-find-file-h org-roam-buffer--setup-redisplay-h
                           org-roam--register-completion-functions-h org-roam--replace-roam-links-on-save-h
                           org-roam-open-id-with-org-roam-db-h org-roam-db-autosync--setup-update-on-save-h
                           +org-roam-open-with-buffer-maybe-h)
 org-refile-use-outline-path t
 org-archive-hook '(org-attach-archive-delete-maybe)
 org-clock-in-hook '(org-clock-auto-clockout)
 org-file-apps '((remote . emacs) (auto-mode . emacs) (directory . emacs) ("\\.mm\\'" . default) ("\\.x?html?\\'" . default)
                 ("\\.pdf\\'" . default))
 org-edit-src-content-indentation 0
 org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers org-cycle-show-empty-lines
                  org-optimize-window-after-visibility-change)
 org-catch-invisible-edits 'smart
 org-persist-before-read-hook '(org-element--cache-persist-before-read)
 org-font-lock-set-keywords-hook '(doom-themes-enable-org-fontification org-drill-add-cloze-fontification)
 org-modules '(ol-bibtex)
 org-image-actual-width nil
 org-attach-use-inheritance t
 org-mode-local-vars-hook '(+org-init-gifs-h eldoc-mode)
 org-mode-hook '(+lookup--init-org-mode-handlers-h
                 (closure ((hook . org-mode-hook) (--dolist-tail--) t) (&rest _)
                  (add-hook 'before-save-hook 'org-encrypt-entries nil t))
                 #[0 "\300\301\302\303\304$\207" [add-hook change-major-mode-hook org-show-all append local] 5]
                 #[0 "\300\301\302\303\304$\207" [add-hook change-major-mode-hook org-babel-show-result-all append local] 5]
                 org-babel-result-hide-spec org-babel-hide-all-hashes
                 #[0 "\301\211%10\207" [imenu-create-index-function org-imenu-get-tree] 2] doom-disable-show-paren-mode-h
                 doom-disable-show-trailing-whitespace-h +org-enable-auto-reformat-tables-h +org-enable-auto-update-cookies-h
                 +org-make-last-point-visible-h org-fancy-priorities-mode org-superstar-mode toc-org-enable org-cdlatex-mode
                 org-eldoc-load)
 org-follow-link-hook '(+nav-flash-delayed-blink-cursor-h)
 org-babel-load-languages '((emacs-lisp . t) (julia-vterm . t) (clojure . t) (dot . t))
 org-src-window-setup 'other-window
 org-id-locations-file "/home/dc/org/.orgids"
 org-roam-ref-annotation-function 'org-roam-ref-read--annotation
 org-roam-directory "/data/org/roam"
 org-superstar-todo-bullet-alist '(("TODO" . 9744) ("[ ]" . 9744) ("DONE" . 9745) ("[X]" . 9745))
 org-agenda-span 10
 org-priority-faces '((65 . error) (66 . warning) (67 . success))
 org-roam-db-node-include-function #[0 "\300\207" [t] 1]
 org-drill-learn-fraction 0.25
 org-confirm-shell-link-function 'yes-or-no-p
 org-reveal-start-hook '(org-decrypt-entry)
 org-agenda-skip-unavailable-files t
 org-treeusage-overlay-usecolorbands nil
 outline-isearch-open-invisible-function 'outline-isearch-open-invisible
 org-drill-add-random-noise-to-intervals-p t
 org-use-sub-superscripts '{}
 org-super-agenda-mode t
 org-startup-indented t
 org-highlight-latex-and-related '(native script entities)
 org-agenda-mode-hook '(+org-habit-resize-graph-h org-fancy-priorities-mode)
 org-link-translation-function 'toc-org-unhrefify
 org-agenda-before-write-hook '(org-agenda-add-entry-text)
 org-capture-prepare-finalize-hook '(org-roam-capture--install-finalize-h)
 org-src-preserve-indentation t
 org-roam-preview-function 'org-roam-preview-default-function
 org-entities-user '(("flat" "\\flat" nil "" "" "266D" "♭") ("sharp" "\\sharp" nil "" "" "266F" "♯"))
 org-babel-tangle-lang-exts '(("graphql" . "gql") ("emacs-lisp" . "el") ("elisp" . "el"))
 org-src-mode-hook '(org-src-babel-configure-edit-buffer org-src-mode-configure-edit-buffer)
 org-roam-db-autosync-mode t
 org-agenda-window-setup 'current-window
 org-tags-exclude-from-inheritance '("crypt")
 org-clock-out-remove-zero-time-clocks t
 org-hide-leading-stars t
 org-todo-keywords '((sequence "TODO(t)" "PROJ(p)" "LOOP(r)" "STRT(s)" "WAIT(w)" "HOLD(h)" "IDEA(i)" "|" "DONE(d)" "KILL(k)")
                     (sequence "[ ](T)" "[-](S)" "[?](W)" "|" "[X](D)") (sequence "|" "OKAY(o)" "YES(y)" "NO(n)"))
 org-agenda-inhibit-startup t
 org-support-shift-select t
 org-blocker-hook '(org-block-todo-from-children-or-siblings-or-parent)
 org-preview-latex-image-directory "/home/dc/.emacs.doom/.local/cache/org-latex/"
 org-fontify-whole-heading-line t
 org-speed-command-hook '(org-speed-command-activate org-babel-speed-command-activate)
 org-clock-persist-file "/home/dc/.emacs.doom/.local/etc/org-clock-save.el"
 org-eldoc-breadcrumb-separator " → "
 org-super-agenda-groups '((:name "Today" :time-grid t :todo "Today") (:habit t) (:name "Due today" :deadline today)
                           (:name "Overdue" :deadline past) (:name "Due soon" :deadline future)
                           (:name "Important" :priority "A") (:priority<= "B" :order 1))
 org-refile-use-cache t
 org-export-backends '(md ascii html icalendar latex odt)
 org-enforce-todo-dependencies t
 org-confirm-babel-evaluate nil
 org-clock-in-resume t
 org-insert-heading-respect-content t
 org-M-RET-may-split-line nil
 org-clock-persist 'history
 org-persist-before-write-hook '(org-element--cache-persist-before-write)
 org-tab-first-hook '(+org-yas-expand-maybe-h +org-indent-maybe-h org-babel-hide-result-toggle-maybe
                      org-babel-header-arg-expand)
 org-link-shell-confirm-function 'yes-or-no-p
 org-agenda-finalize-hook '(org-fancy-priorities-create-overlays +org-exclude-agenda-buffers-from-workspace-h
                            +org-defer-mode-in-agenda-buffers-h)
 org-babel-pre-tangle-hook '(save-buffer)
 org-roam-completion-everywhere t
 org-agenda-loop-over-headlines-in-active-region nil
 org-fontify-quote-and-verse-blocks t
 org-agenda-start-on-weekday nil
 org-attach-id-dir "/data/org/.attach/"
 org-todo-keyword-faces '(("[-]" . +org-todo-active) ("STRT" . +org-todo-active) ("[?]" . +org-todo-onhold)
                          ("WAIT" . +org-todo-onhold) ("HOLD" . +org-todo-onhold) ("PROJ" . +org-todo-project)
                          ("NO" . +org-todo-cancel) ("KILL" . +org-todo-cancel))
 org-capture-mode-hook '(+org-show-target-in-capture-header-h)
 org-agenda-deadline-faces '((1.001 . error) (1.0 . org-warning) (0.5 . org-upcoming-deadline)
                             (0.0 . org-upcoming-distant-deadline))
 org-occur-hook '(org-first-headline-recenter)
 org-capture-after-finalize-hook '(+org-capture-cleanup-frame-h)
 org-metadown-hook '(org-babel-pop-to-session-maybe)
 org-roam-node-annotation-function 'org-roam-node-read--annotation
 org-link-parameters '(("bibtex" :follow org-bibtex-open :store org-bibtex-store-link)
                       ("download" :complete
                        (closure
                         ((dir-fn closure (t) nil (or org-download-image-dir org-attach-id-dir "."))
                          (requires . org-download) (plist :image-data-fun +org-image-file-data-fn :requires org-download)
                          (dir-var closure (t) nil (or org-download-image-dir org-attach-id-dir ".")) (key . "download") t)
                         nil (if requires (mapc #'require (doom-enlist requires)))
                         (+org--relative-path (+org--read-link-path key (funcall dir-fn)) (funcall dir-fn)))
                        :follow
                        (closure
                         ((dir-fn closure (t) nil (or org-download-image-dir org-attach-id-dir "."))
                          (requires . org-download) (plist :image-data-fun +org-image-file-data-fn :requires org-download)
                          (dir-var closure (t) nil (or org-download-image-dir org-attach-id-dir ".")) (key . "download") t)
                         (link) (org-link-open-as-file (expand-file-name link (funcall dir-fn)) nil))
                        :face
                        (closure
                         ((dir-fn closure (t) nil (or org-download-image-dir org-attach-id-dir "."))
                          (requires . org-download) (plist :image-data-fun +org-image-file-data-fn :requires org-download)
                          (dir-var closure (t) nil (or org-download-image-dir org-attach-id-dir ".")) (key . "download") t)
                         (link)
                         (let*
                          ((path (expand-file-name link (funcall dir-fn)))
                           (option-index (string-match-p "::\\(.*\\)\\'" path)) (file-name (substring path 0 option-index)))
                          (if (file-exists-p file-name) 'org-link 'error))
                         )
                        :image-data-fun +org-image-file-data-fn)
                       ("pdf" :follow
                        (closure ((args) (fn . org-pdftools-open) t) (&rest args)
                         (and (condition-case nil (progn (require 'org-pdftools nil t)) (error nil))
                          (file-executable-p pdf-info-epdfinfo-program) (apply fn args))
                         )
                        :complete
                        (closure ((args) (fn . org-pdftools-complete-link) t) (&rest args)
                         (and (condition-case nil (progn (require 'org-pdftools nil t)) (error nil))
                          (file-executable-p pdf-info-epdfinfo-program) (apply fn args))
                         )
                        :store
                        (closure ((args) (fn . org-pdftools-store-link) t) (&rest args)
                         (and (condition-case nil (progn (require 'org-pdftools nil t)) (error nil))
                          (file-executable-p pdf-info-epdfinfo-program) (apply fn args))
                         )
                        :export
                        (closure ((args) (fn . org-pdftools-export) t) (&rest args)
                         (and (condition-case nil (progn (require 'org-pdftools nil t)) (error nil))
                          (file-executable-p pdf-info-epdfinfo-program) (apply fn args))
                         )
                        )
                       ("orgit-topic" :store orgit-topic-store :follow orgit-topic-open :export orgit-topic-export :complete
                        orgit-topic-complete-link)
                       ("orgit-rev" :store orgit-rev-store :follow orgit-rev-open :export orgit-rev-export :complete
                        orgit-rev-complete-link)
                       ("orgit-log" :store orgit-log-store :follow orgit-log-open :export orgit-log-export :complete
                        orgit-log-complete-link)
                       ("orgit" :store orgit-status-store :follow orgit-status-open :export orgit-status-export :complete
                        orgit-status-complete-link)
                       ("roam" :follow org-roam-link-follow-link)
                       ("yt" :follow org-yt-follow :image-data-fun org-yt-image-data-fun) ("id" :follow org-id-open)
                       ("img" :image-data-fun +org-inline-image-data-fn)
                       ("doom-module" :follow +org-link--doom-module-follow-fn :face +org-link--doom-module-face-fn)
                       ("doom-package" :follow +org-link--doom-package-follow-fn :face
                        (closure (t) (_) '(:inherit org-priority :slant italic)))
                       ("kbd" :follow (closure (t) (_) (minibuffer-message "%s" (+org-display-link-in-eldoc-a))) :help-echo
                        +org-read-kbd-at-point :face help-key-binding)
                       ("doom-modules" :complete
                        (closure
                         ((dir-fn closure ((plist) (dir-var . doom-modules-dir) (key . "doom-modules") t) nil
                           (symbol-value dir-var))
                          (requires) (plist) (dir-var . doom-modules-dir) (key . "doom-modules") t)
                         nil (if requires (mapc #'require (doom-enlist requires)))
                         (+org--relative-path (+org--read-link-path key (funcall dir-fn)) (funcall dir-fn)))
                        :follow
                        (closure
                         ((dir-fn closure ((plist) (dir-var . doom-modules-dir) (key . "doom-modules") t) nil
                           (symbol-value dir-var))
                          (requires) (plist) (dir-var . doom-modules-dir) (key . "doom-modules") t)
                         (link) (org-link-open-as-file (expand-file-name link (funcall dir-fn)) nil))
                        :face
                        (closure
                         ((dir-fn closure ((plist) (dir-var . doom-modules-dir) (key . "doom-modules") t) nil
                           (symbol-value dir-var))
                          (requires) (plist) (dir-var . doom-modules-dir) (key . "doom-modules") t)
                         (link)
                         (let*
                          ((path (expand-file-name link (funcall dir-fn)))
                           (option-index (string-match-p "::\\(.*\\)\\'" path)) (file-name (substring path 0 option-index)))
                          (if (file-exists-p file-name) 'org-link 'error))
                         )
                        )
                       ("doom-docs" :complete
                        (closure
                         ((dir-fn closure ((plist) (dir-var . doom-docs-dir) (key . "doom-docs") t) nil
                           (symbol-value dir-var))
                          (requires) (plist) (dir-var . doom-docs-dir) (key . "doom-docs") t)
                         nil (if requires (mapc #'require (doom-enlist requires)))
                         (+org--relative-path (+org--read-link-path key (funcall dir-fn)) (funcall dir-fn)))
                        :follow
                        (closure
                         ((dir-fn closure ((plist) (dir-var . doom-docs-dir) (key . "doom-docs") t) nil
                           (symbol-value dir-var))
                          (requires) (plist) (dir-var . doom-docs-dir) (key . "doom-docs") t)
                         (link) (org-link-open-as-file (expand-file-name link (funcall dir-fn)) nil))
                        :face
                        (closure
                         ((dir-fn closure ((plist) (dir-var . doom-docs-dir) (key . "doom-docs") t) nil
                           (symbol-value dir-var))
                          (requires) (plist) (dir-var . doom-docs-dir) (key . "doom-docs") t)
                         (link)
                         (let*
                          ((path (expand-file-name link (funcall dir-fn)))
                           (option-index (string-match-p "::\\(.*\\)\\'" path)) (file-name (substring path 0 option-index)))
                          (if (file-exists-p file-name) 'org-link 'error))
                         )
                        )
                       ("doom" :complete
                        (closure
                         ((dir-fn closure ((plist) (dir-var . doom-emacs-dir) (key . "doom") t) nil (symbol-value dir-var))
                          (requires) (plist) (dir-var . doom-emacs-dir) (key . "doom") t)
                         nil (if requires (mapc #'require (doom-enlist requires)))
                         (+org--relative-path (+org--read-link-path key (funcall dir-fn)) (funcall dir-fn)))
                        :follow
                        (closure
                         ((dir-fn closure ((plist) (dir-var . doom-emacs-dir) (key . "doom") t) nil (symbol-value dir-var))
                          (requires) (plist) (dir-var . doom-emacs-dir) (key . "doom") t)
                         (link) (org-link-open-as-file (expand-file-name link (funcall dir-fn)) nil))
                        :face
                        (closure
                         ((dir-fn closure ((plist) (dir-var . doom-emacs-dir) (key . "doom") t) nil (symbol-value dir-var))
                          (requires) (plist) (dir-var . doom-emacs-dir) (key . "doom") t)
                         (link)
                         (let*
                          ((path (expand-file-name link (funcall dir-fn)))
                           (option-index (string-match-p "::\\(.*\\)\\'" path)) (file-name (substring path 0 option-index)))
                          (if (file-exists-p file-name) 'org-link 'error))
                         )
                        )
                       ("org" :complete
                        (closure
                         ((dir-fn closure ((plist) (dir-var . org-directory) (key . "org") t) nil (symbol-value dir-var))
                          (requires) (plist) (dir-var . org-directory) (key . "org") t)
                         nil (if requires (mapc #'require (doom-enlist requires)))
                         (+org--relative-path (+org--read-link-path key (funcall dir-fn)) (funcall dir-fn)))
                        :follow
                        (closure
                         ((dir-fn closure ((plist) (dir-var . org-directory) (key . "org") t) nil (symbol-value dir-var))
                          (requires) (plist) (dir-var . org-directory) (key . "org") t)
                         (link) (org-link-open-as-file (expand-file-name link (funcall dir-fn)) nil))
                        :face
                        (closure
                         ((dir-fn closure ((plist) (dir-var . org-directory) (key . "org") t) nil (symbol-value dir-var))
                          (requires) (plist) (dir-var . org-directory) (key . "org") t)
                         (link)
                         (let*
                          ((path (expand-file-name link (funcall dir-fn)))
                           (option-index (string-match-p "::\\(.*\\)\\'" path)) (file-name (substring path 0 option-index)))
                          (if (file-exists-p file-name) 'org-link 'error))
                         )
                        )
                       ("attachment" :image-data-fun +org-inline-image-data-fn :follow org-attach-follow :complete
                        org-attach-complete-link)
                       ("file+sys") ("file+emacs") ("shell" :follow org-link--open-shell)
                       ("news" :follow #[514 "\301\300\302%4Q%2\"\207" ["news" browse-url ":"] 6 "\n\n(fn URL ARG)"])
                       ("mailto" :follow #[514 "\301\300\302%4Q%2\"\207" ["mailto" browse-url ":"] 6 "\n\n(fn URL ARG)"])
                       ("https" :follow #[514 "\301\300\302%4Q%2\"\207" ["https" browse-url ":"] 6 "\n\n(fn URL ARG)"]
                        :image-data-fun +org-http-image-data-fn)
                       ("http" :follow #[514 "\301\300\302%4Q%2\"\207" ["http" browse-url ":"] 6 "\n\n(fn URL ARG)"]
                        :image-data-fun +org-http-image-data-fn)
                       ("ftp" :follow #[514 "\301\300\302%4Q%2\"\207" ["ftp" browse-url ":"] 6 "\n\n(fn URL ARG)"])
                       ("help" :follow org-link--open-help :store org-link--store-help)
                       ("file" :complete org-link-complete-file :face
                        (closure (t) (path)
                         (if (or (file-remote-p path) (and IS-WINDOWS (string-prefix-p "\\\\" path)) (file-exists-p path))
                          'org-link '(warning org-link))
                         )
                        )
                       ("elisp" :follow org-link--open-elisp))
 org-roam-capture-templates '(("p" "projects" plain "%?" :unnarrowed t :target
                               (file+head "projects/${slug}.org" "#+title: ${title}\n\n"))
                              ("t" "topics" plain "%?" :unnarrowed t :target
                               (file+head "topics/${slug}.org" "#+title: ${title}\n\n"))
                              ("c" "code" plain "%?" :unnarrowed t :target
                               (file+head "code/${slug}.org" "#+title: ${title}\n\n"))
                              ("D" "drills" plain "%?" :unnarrowed t :target
                               (file+head "drills/${slug}.org" "#+title: ${title}\n\n"))
                              ("n" "noter (DOI)" plain "%?" :unnarrowed t :target
                               (file+head "noter/${slug}.org" "#+title: ${title}\n\n"))
                              ("s" "slips" plain "%?" :unnarrowed t :target
                               (file+head "slips/%<%Y%m%d%H%M%S>-${slug}.org" "#+title: ${title}"))
                              ("d" "default" plain "%?" :target
                               (file+head "%<%Y%m%d%H%M%S>-${slug}.org" "#+title: ${title}\n") :unnarrowed t)
                              )
 org-fancy-priorities-list '("⚑" "⬆" "■")
 org-metaup-hook '(org-babel-load-in-session-maybe)
 org-refile-allow-creating-parent-nodes 'confirm
 org-superstar-leading-bullet 32
 org-imenu-depth 6
 org-display-remote-inline-images 'download
 org-clock-auto-clockout-timer 300
 org-outline-path-complete-in-steps nil
 org-special-ctrl-a/e t
 org-tags-column 0
 org-src-lang-modes '(("translate" . text) ("md" . markdown) ("C" . c) ("C++" . c++) ("asymptote" . asy) ("bash" . sh)
                      ("beamer" . latex) ("calc" . fundamental) ("cpp" . c++) ("ditaa" . artist) ("dot" . fundamental)
                      ("elisp" . emacs-lisp) ("ocaml" . tuareg) ("screen" . shell-script) ("shell" . sh) ("sqlite" . sql))
 org-clock-history-length 20
 org-attach-store-link-p t
 org-id-locations-file-relative t
 org-archive-subtree-save-file-p t
 org-list-allow-alphabetical t
 )