* [BUG] Bug in parser [9.7 (9.7-??-57b94f344 @ /home/jose/.config/emacs/.local/straight/build-29.1/org/)]
@ 2024-01-07 21:18 Jose Salazar
2024-01-12 14:21 ` Ihor Radchenko
0 siblings, 1 reply; 2+ messages in thread
From: Jose Salazar @ 2024-01-07 21:18 UTC (permalink / raw)
To: emacs-orgmode
[-- Attachment #1: Type: text/plain, Size: 36152 bytes --]
This bug often happens when I load things (such as loading a literate agda
program -- "*.lagda.org", or rendering inline latex, e.g. $x = x^2$).
I'm using Doom and NixOS.
It doesn't actively disrupt my workflow (only that a window is opened)
The message is the following:
⛔ Warning (org-element): org-element--cache: Org parser error in
concepts.lagda.org::#<marker at 78 in concepts.lagda.org>. Resetting.
The error was: (error "org-element--cache: Emergency exit")
Backtrace:
" backtrace-to-string(nil)
org-element-at-point(#<marker at 78 in concepts.lagda.org>)
org-element-cache-map(#f(compiled-function (el) #<bytecode
0x1605c7e9a3ac51a6>) :next-re \"^\\\\*+ \" :fail-re \"^\\\\*+ \" :narrow t)
org-scan-tags(org-encrypt-entry (lambda (todo tags-list level) (progn
(setq org-cached-props nil) (or (and (member \"crypt\" tags-list))))) nil)
org-encrypt-entries()
run-hooks(before-save-hook)
#<subr basic-save-buffer>(nil)
polymode-with-current-base-buffer(#<subr basic-save-buffer> nil)
apply(polymode-with-current-base-buffer #<subr basic-save-buffer> nil)
basic-save-buffer(nil)
#<subr save-buffer>()
funcall(#<subr save-buffer>)
(let ((apheleia-mode (and apheleia-mode (memq arg '(nil 1))))) (funcall
orig-fn))
+format--inhibit-reformat-on-prefix-arg-a(#<subr save-buffer> 1)
apply(+format--inhibit-reformat-on-prefix-arg-a #<subr save-buffer> 1)
save-buffer(1)
funcall-interactively(save-buffer 1)
command-execute(save-buffer)
"
The buffer is the following:
```
#+title: A
#+begin_src agda2
data S : Set where
null : S
a : S
#+end_src
```
The bug often happens after loading (and this specific instance happened
when loading with agda)
This is the doom info:
```
generated Jan 07, 2024 15:15:52
system NixOS 23.11pre550792.3f21a22b5aaf (Tapir) Linux
6.1.62 x86_64
emacs 29.1 ~/.config/emacs/
doom 3.0.0-pre PROFILE=_@0 HEAD -> master 03d692f1
2023-12-08 15:11:45 -0500 ~/.config/doom/
shell /run/current-system/sw/bin/bash
features CAIRO DBUS FREETYPE GIF GLIB GMP GNUTLS GPM
GSETTINGS HARFBUZZ JPEG JSON LIBOTF LIBSELINUX
LIBSYSTEMD LIBXML2 M17N_FLT MODULES NATIVE_COMP
NOTIFY INOTIFY PDUMPER PNG RSVG SECCOMP SOUND
SQLITE3 THREADS TIFF TOOLKIT_SCROLL_BARS
TREE_SITTER WEBP X11 XAW3D XDBE XIM XINPUT2 XPM
LUCID ZLIB
traits batch server-running envvar-file custom-file
modules :config use-package :completion company vertico
:ui doom doom-dashboard doom-quit (emoji +unicode)
hl-todo ligatures minimap modeline ophints (popup
+defaults) tabs treemacs unicode (vc-gutter
+pretty) vi-tilde-fringe workspaces zen :editor
(evil +everywhere) file-templates fold (format
+onsave) lispy snippets :emacs dired electric undo
vc :term eshell vterm :checkers syntax (spell
+flyspell) grammar :tools biblio collab
editorconfig ein (eval +overlay) gist lookup (lsp
+peek) magit make pdf tmux tree-sitter :lang agda
(cc +lsp) common-lisp coq data emacs-lisp (go
+lsp) (haskell +lsp) idris (json +lsp) (javascript
+lsp) (julia +lsp) latex lean markdown nix (org
+dragndrop +pretty +roam2) (python +lsp) (racket
+lsp +xp) (rust +lsp) scheme (sh +fish +lsp) :app
calendar :config (default +bindings +smartparens)
packages (polymode) (org-agda-mode :recipe (:host github
:repo alhassy/org-agda-mode))
```
------------------------------------------------------------------------
Emacs : GNU Emacs 29.1 (build 1, x86_64-pc-linux-gnu, X toolkit, cairo
version 1.18.0, Xaw3d scroll bars)
Package: Org mode version 9.7 (9.7-??-57b94f344 @
/home/jose/.config/emacs/.local/straight/build-29.1/org/)
current state:
==============
(setq
org-link-elisp-confirm-function nil
org-directory "~/org/"
org-cite-insert-processor 'citar
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 'org-bibtex-headline-format-default
org-roam-mode-hook '(+org-roam-detach-magit-section-mode-map-h
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-smartparens-h
+org-init-roam-h)
org-startup-folded nil
org-babel-after-execute-hook
'(+org-redisplay-inline-images-in-babel-result-h)
org-link-abbrev-alist '(("doomdir" . "/home/jose/.config/doom/%s")
("emacsdir" . "/home/jose/.config/emacs/%s")
("doom-repo" . "
https://github.com/doomemacs/doomemacs/%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 '("~/org/")
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-type:12}
${doom-tags:42}" 20 35 (face font-lock-keyword-face) 36 51 (face (:inherit
org-tag :box nil)))
org-persist-after-read-hook '(org-element--cache-persist-after-read)
org-format-latex-options '(:foreground default :background default :scale
1.5
:html-foreground "Black" :html-background
"Transparent"
:html-scale 1.0 :matchers
("begin" "$1" "$" "$$" "\\(" "\\["))
org-refile-targets '((nil :maxlevel . 3) (org-agenda-files :maxlevel . 3))
org-export-before-parsing-hook '(org-attach-expand-links)
org-cycle-tab-first-hook '(+org-yas-expand-maybe-h +org-indent-maybe-h
org-babel-hide-result-toggle-maybe
org-babel-header-arg-expand
+org-clear-babel-results-h
+org-cycle-only-current-subtree-h)
org-default-notes-file "/home/jose/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-db-autosync--setup-update-on-save-h
+org-roam-enable-auto-backlinks-buffer-h)
org-refile-use-outline-path 'file
org-archive-hook '(org-attach-archive-delete-maybe)
org-cite-follow-processor 'citar
org-file-apps '((remote . emacs) (auto-mode . emacs) (directory . emacs)
("\\.mm\\'" . default) ("\\.x?html?\\'" . default)
("\\.pdf\\'" . default))
org-cycle-hook '(org-cycle-hide-archived-subtrees
org-cycle-show-empty-lines
org-cycle-optimize-window-after-visibility-change
org-cycle-display-inline-images)
org-persist-before-read-hook '(org-element--cache-persist-before-read)
org-font-lock-set-keywords-hook '(doom-themes-enable-org-fontification)
org-modules '(ol-bibtex)
org-image-actual-width nil
org-attach-use-inheritance t
org-mode-local-vars-hook '(+org-init-gifs-h)
org-mode-hook '(er/add-org-mode-expansions
+lookup--init-org-mode-handlers-h
(closure (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-fold-show-all
append local] 5]
#[0 "\301\211 \207"
[imenu-create-index-function org-imenu-get-tree] 2]
doom-disable-show-paren-mode-h
doom-disable-show-trailing-whitespace-h
+org-make-last-point-visible-h org-appear-mode
org-fancy-priorities-mode org-superstar-mode evil-org-mode
toc-org-enable
#[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
writegood-mode
flyspell-mode embrace-org-mode-hook)
org-src-window-setup 'other-window
org-id-locations-file "/home/jose/org/.orgids"
org-roam-ref-annotation-function 'org-roam-ref-read--annotation
org-roam-directory "/home/jose/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-roam-node-template-prefixes '(("doom-type" . "@") ("doom-tags" . "#")
("tags" . "#") ("todo" . "t:"))
org-confirm-shell-link-function 'yes-or-no-p
org-reveal-start-hook '(org-decrypt-entry)
org-agenda-skip-unavailable-files t
outline-isearch-open-invisible-function 'outline-isearch-open-invisible
org-use-sub-superscripts '{}
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
evil-org-agenda-mode)
org-roam-capture-preface-hook '(org-roam-capture--try-capture-to-ref-h)
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-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-log-buffer-setup-hook '(org-roam-log--setup)
org-cite-activate-processor 'citar
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-roam-capture-new-node-hook '(org-roam-capture--insert-captured-ref-h)
org-support-shift-select t
org-blocker-hook '(org-block-todo-from-children-or-siblings-or-parent)
org-preview-latex-image-directory
"/home/jose/.config/emacs/.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/jose/.config/emacs/.local/etc/org-clock-save.el"
org-persist-directory "/home/jose/.config/emacs/.local/cache/org/persist/"
org-export-backends '(md ascii html icalendar latex odt)
org-roam-list-files-commands '(fd fdfind rg find)
org-enforce-todo-dependencies t
org-confirm-babel-evaluate nil
org-fold-core-isearch-open-function 'org-fold-core--isearch-reveal
org-clock-in-resume t
org-cite-export-processors '((latex biblatex) (t csl))
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-clear-babel-results-h
+org-cycle-only-current-subtree-h)
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 "/home/jose/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
evil-insert-state)
org-agenda-deadline-faces '((1.001 . error) (1.0 . org-warning)
(0.5 . org-upcoming-deadline)
(0.0 . org-upcoming-distant-deadline))
org-fold-reveal-start-hook '(org-decrypt-entry)
org-occur-hook '(org-first-headline-recenter)
org-capture-after-finalize-hook '(+org-capture-cleanup-frame-h)
org-roam-log-setup-hook '(org-roam--register-completion-functions-h)
org-metadown-hook '(org-babel-pop-to-session-maybe)
org-roam-node-annotation-function 'org-roam-node-read--annotation
org-link-parameters '(("treemacs" :store treemacs-store-org-link)
("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) (key . "download"))
nil (if requires (mapc #'require (ensure-list
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
"."))
)
(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
"."))
)
(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 :requires
nil)
("pdf" :follow
(closure ((args) (fn . org-pdftools-open)) (&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))
(&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))
(&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)) (&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-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 :export org-yt-export)
("id" :follow org-roam-id-open)
("img" :image-data-fun +org-inline-image-data-fn)
("doom-changelog" :follow
(closure (t) (link)
(find-file (doom-path doom-docs-dir "changelog.org
"))
(org-match-sparse-tree nil link))
)
("doom-user" :follow
(closure (t) (link)
(browse-url
(format "https://github.com/%s"
(string-remove-prefix "@"
(+org-link-read-desc-at-point link))
)
)
)
:face (closure (t) (_) 'org-priority))
("doom-ref" :follow
(closure (t) (link)
(let
((link (+org-link-read-desc-at-point link))
(url "https://github.com")
(doom-repo "doomemacs/doomemacs"))
(let ((saved-match-data (match-data)))
(unwind-protect
(progn
(browse-url
(cond
((string-match
"^\\([^/]+\\(?:/[^/]+\\)?\\)?#\\([0-9]+\\(?:#.*\\)?\\)" link)
(format "%s/%s/issues/%s" url
(or (match-string 1 link) doom-repo)
(match-string 2 link))
)
((string-match
"^\\([^/]+\\(?:/[^/]+\\)?@\\)?\\([a-z0-9]\\{7,\\}\\(?:#.*\\)?\\)" link)
(format "%s/%s/commit/%s" url
(or (match-string 1 link) doom-repo)
(match-string 2 link))
)
((user-error "Invalid doom-ref link: %S"
link)))
)
)
(set-match-data saved-match-data t))
)
)
)
:face
(closure (t) (link)
(let ((link (+org-link-read-desc-at-point link)))
(if
(or
(string-match
"^\\([^/]+\\(?:/[^/]+\\)?\\)?#\\([0-9]+\\(?:#.*\\)?\\)"
link)
(string-match
"^\\([^/]+\\(?:/[^/]+\\)?@\\)?\\([a-z0-9]\\{7,\\}\\(?:#.*\\)?\\)" link)
)
'org-link 'error)
)
)
)
("doom-executable" :activate-func
+org-link--doom-executable-link-activate-fn
:help-echo
+org-link-doom--help-echo-from-textprop :face
org-verbatim)
("doom-module" :follow
+org-link--doom-module-link-follow-fn
:activate-func
+org-link--doom-module-link-activate-fn
:help-echo +org-link-doom--help-echo-from-textprop)
("doom-package" :follow
+org-link--doom-package-link-follow-fn
:activate-func
+org-link--doom-package-link-activate-fn
:help-echo +org-link-doom--help-echo-from-textprop)
("cmd" :follow
(closure ((fn . describe-command)) (path _prefixarg)
(funcall fn
(or (intern-soft path)
(user-error "Can't find documentation for %S"
path))
)
)
:activate-func +org-link--command-link-activate-fn
:face
help-key-binding :help-echo
+org-link-doom--help-echo-from-textprop)
("face" :follow
(closure ((fn . describe-face)) (path _prefixarg)
(funcall fn
(or (intern-soft path)
(user-error "Can't find documentation for %S"
path))
)
)
:activate-func +org-link--face-link-activate-fn
:face
(font-lock-type-face underline))
("fn" :follow
(closure ((fn . helpful-callable)) (path _prefixarg)
(funcall fn
(or (intern-soft path)
(user-error "Can't find documentation for %S"
path))
)
)
:activate-func +org-link--fn-link-activate-fn :face
(font-lock-function-name-face underline))
("var" :follow
(closure ((fn . helpful-variable)) (path _prefixarg)
(funcall fn
(or (intern-soft path)
(user-error "Can't find documentation for %S"
path))
)
)
:activate-func +org-link--var-link-activate-fn :face
(font-lock-variable-name-face underline))
("kbd" :follow
(closure (t) (ev) (interactive "e")
(minibuffer-message "%s"
(+org-link-doom--help-echo-from-textprop nil
(current-buffer) (posn-point (event-start ev)))
)
)
:help-echo +org-link-doom--help-echo-from-textprop
:face
help-key-binding)
("doom-modules" :complete
(closure
((dir-fn closure ((dir-var . doom-modules-dir)) nil
(symbol-value dir-var))
(requires) (key . "doom-modules"))
nil (if requires (mapc #'require (ensure-list
requires)))
(+org--relative-path
(+org--read-link-path key (funcall dir-fn))
(funcall dir-fn))
)
:follow
(closure
((dir-fn closure ((dir-var . doom-modules-dir)) nil
(symbol-value dir-var))
)
(link)
(org-link-open-as-file
(expand-file-name link (funcall dir-fn)) nil)
)
:face
(closure
((dir-fn closure ((dir-var . doom-modules-dir)) nil
(symbol-value dir-var))
)
(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))
)
:requires nil)
("doom-docs" :complete
(closure
((dir-fn closure ((dir-var . doom-docs-dir)) nil
(symbol-value dir-var))
(requires) (key . "doom-docs"))
nil (if requires (mapc #'require (ensure-list
requires)))
(+org--relative-path
(+org--read-link-path key (funcall dir-fn))
(funcall dir-fn))
)
:follow
(closure
((dir-fn closure ((dir-var . doom-docs-dir)) nil
(symbol-value dir-var))
)
(link)
(org-link-open-as-file
(expand-file-name link (funcall dir-fn)) nil)
)
:face
(closure
((dir-fn closure ((dir-var . doom-docs-dir)) nil
(symbol-value dir-var))
)
(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))
)
:requires nil)
("doom" :complete
(closure
((dir-fn closure ((dir-var . doom-emacs-dir)) nil
(symbol-value dir-var))
(requires) (key . "doom"))
nil (if requires (mapc #'require (ensure-list
requires)))
(+org--relative-path
(+org--read-link-path key (funcall dir-fn))
(funcall dir-fn))
)
:follow
(closure
((dir-fn closure ((dir-var . doom-emacs-dir)) nil
(symbol-value dir-var))
)
(link)
(org-link-open-as-file
(expand-file-name link (funcall dir-fn)) nil)
)
:face
(closure
((dir-fn closure ((dir-var . doom-emacs-dir)) nil
(symbol-value dir-var))
)
(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))
)
:requires nil)
("org" :complete
(closure
((dir-fn closure ((dir-var . org-directory)) nil
(symbol-value dir-var))
(requires) (key . "org"))
nil (if requires (mapc #'require (ensure-list
requires)))
(+org--relative-path
(+org--read-link-path key (funcall dir-fn))
(funcall dir-fn))
)
:follow
(closure
((dir-fn closure ((dir-var . org-directory)) nil
(symbol-value dir-var))
)
(link)
(org-link-open-as-file
(expand-file-name link (funcall dir-fn)) nil)
)
:face
(closure
((dir-fn closure ((dir-var . org-directory)) nil
(symbol-value dir-var))
)
(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))
)
:requires nil)
("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 Q \"\207" ["news" browse-url
":"] 6
"\n\n(fn URL ARG)"]
)
("mailto" :follow
#[514 "\301\300\302 Q \"\207" ["mailto" browse-url
":"] 6
"\n\n(fn URL ARG)"]
)
("https" :follow
#[514 "\301\300\302 Q \"\207" ["https" browse-url
":"] 6
"\n\n(fn URL ARG)"]
:image-data-fun +org-http-image-data-fn)
("http" :follow
#[514 "\301\300\302 Q \"\207" ["http" browse-url
":"] 6
"\n\n(fn URL ARG)"]
:image-data-fun +org-http-image-data-fn)
("ftp" :follow
#[514 "\301\300\302 Q \"\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)
(if IS-WINDOWS (string-prefix-p "\\\\" path))
(file-exists-p path))
'org-link '(warning org-link))
)
)
("elisp" :follow org-link--open-elisp))
org-metaup-hook '(org-babel-load-in-session-maybe)
org-fancy-priorities-list '("⚑" "⬆" "■")
org-superstar-leading-bullet 32
org-imenu-depth 6
org-display-remote-inline-images 'download
org-outline-path-complete-in-steps nil
org-special-ctrl-a/e t
org-tags-column 0
org-src-lang-modes '(("rust" . rustic) ("md" . markdown) ("C" . c) ("C++"
. c++)
("asymptote" . asy) ("beamer" . latex) ("calc" .
fundamental)
("cpp" . c++) ("ditaa" . artist) ("desktop" .
conf-desktop)
("dot" . fundamental) ("elisp" . emacs-lisp) ("ocaml"
. tuareg)
("screen" . shell-script) ("sqlite" . sql) ("toml" .
conf-toml)
("shell" . sh) ("ash" . sh) ("sh" . sh) ("bash" . sh)
("jsh" . sh) ("bash2" . sh) ("dash" . sh) ("dtksh" .
sh)
("ksh" . sh) ("es" . sh) ("rc" . sh) ("itcsh" . sh)
("tcsh" . sh) ("jcsh" . sh) ("csh" . sh) ("ksh88" .
sh)
("oash" . sh) ("pdksh" . sh) ("mksh" . sh) ("posix" .
sh)
("wksh" . sh) ("wsh" . sh) ("zsh" . sh) ("rpm" . sh))
org-clock-history-length 20
org-attach-store-link-p 'attached
org-roam-indirect-buffer-hook '(org-roam--register-completion-functions-h)
org-id-locations-file-relative t
org-archive-subtree-save-file-p t
org-list-allow-alphabetical t
)
[-- Attachment #2: Type: text/html, Size: 47815 bytes --]
^ permalink raw reply [flat|nested] 2+ messages in thread
* Re: [BUG] Bug in parser [9.7 (9.7-??-57b94f344 @ /home/jose/.config/emacs/.local/straight/build-29.1/org/)]
2024-01-07 21:18 [BUG] Bug in parser [9.7 (9.7-??-57b94f344 @ /home/jose/.config/emacs/.local/straight/build-29.1/org/)] Jose Salazar
@ 2024-01-12 14:21 ` Ihor Radchenko
0 siblings, 0 replies; 2+ messages in thread
From: Ihor Radchenko @ 2024-01-12 14:21 UTC (permalink / raw)
To: Jose Salazar; +Cc: emacs-orgmode
Jose Salazar <jose.salazarg03@gmail.com> writes:
> This bug often happens when I load things (such as loading a literate agda
> program -- "*.lagda.org", or rendering inline latex, e.g. $x = x^2$).
>
> I'm using Doom and NixOS.
> It doesn't actively disrupt my workflow (only that a window is opened)
Your Org mode version is not the newest and we had a couple of fixes for
edge cases in the parser after 57b94f344. If you are lucky, the warning
should disappear after updating Org mode to the latest main.
Let us know if you still see the warning after upgrade.
--
Ihor Radchenko // yantar92,
Org mode contributor,
Learn more about Org mode at <https://orgmode.org/>.
Support Org development at <https://liberapay.com/org-mode>,
or support my work at <https://liberapay.com/yantar92>
^ permalink raw reply [flat|nested] 2+ messages in thread
end of thread, other threads:[~2024-01-12 14:19 UTC | newest]
Thread overview: 2+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2024-01-07 21:18 [BUG] Bug in parser [9.7 (9.7-??-57b94f344 @ /home/jose/.config/emacs/.local/straight/build-29.1/org/)] Jose Salazar
2024-01-12 14:21 ` Ihor Radchenko
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).