emacs-orgmode
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[BUG] Org-element--cache: unregistered buffer [9.8 (9.8-??-39272e216 @ /


From: Fernando Niño
Subject: [BUG] Org-element--cache: unregistered buffer [9.8 (9.8-??-39272e216 @ /Users/nino/.emacs.d/.local/straight/build-29.1/org/)]
Date: Thu, 04 Jul 2024 14:51:43 +0200


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.
------------------------------------------------------------------------



Emacs  : GNU Emacs 29.1 (build 1, aarch64-apple-darwin21.6.0, Carbon Version 
165 AppKit 2113.6)
 of 2024-02-05
Package: Org mode version 9.8 (9.8-??-39272e216 @ 
/Users/nino/.emacs.d/.local/straight/build-29.1/org/)

current state:
==============
(setq
 org-noter--doc-goto-location-hook '(org-noter-djvu--goto-location 
org-noter-nov--goto-location org-noter-pdf--goto-location)
 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-download-file-format-function 'org-download-file-format-default
 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-smartparens-h +org-init-roam-h)
 org-journal-find-file-fn 'find-file
 org-startup-folded nil
 org-babel-after-execute-hook '(+org-redisplay-inline-images-in-babel-result-h)
 org-link-abbrev-alist '(("doomdir" . "/Users/nino/.doom.d/%s") ("emacsdir" . 
"/Users/nino/.emacs.d/%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";)
                         ("kagi" . "https://kagi.com/search?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 '("~/gtd/inbox.org" "~/gtd/gtd.org" "~/gtd/someday.org" 
"~/gtd/tickler.org" "~/org/fdr4alt.org")
 org-journal-dir "/Users/nino/org/journal/"
 org-journal-date-format "%A, %Y/%m/%d"
 org-capture-templates '(("t" "Todo [inbox]" entry (file+headline 
"~/gtd/inbox.org" "Tasks") "* TODO %?\n  %i\n  %a")
                         ("s" "Someday" entry (file+headline 
"~/gtd/someday.org" "Tasks") "* TODO %?\n  %i\n  %a")
                         ("j" "Journal" entry (file+olp+datetree 
"~/org/journal.org") "* %?\nEntered on %U\n  %i\n  %a")
                         ("T" "Tickler" entry (file+headline 
"~/gtd/tickler.org" "Tasks") "* %i%? \n %U"))
 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-refile-targets '((nil :maxlevel . 3) (org-agenda-files :maxlevel . 3))
 org-roam-file-exclude-regexp '("/Users/nino/org/.attach/")
 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-default-notes-file "/Users/nino/org/notes.org"
 org-download-method 'attach
 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 t
 org-publish-timestamp-directory 
"/Users/nino/.emacs.d/.local/cache/org/timestamps/"
 org-archive-hook '(org-attach-archive-delete-maybe)
 org-cite-follow-processor 'citar
 org-file-apps '(("\\.odt\\'" . "open %s") ("\\.doc?\\'" . "open %s") 
("\\.docx?\\'" . "open %s") (remote . emacs) (auto-mode . emacs) (directory . 
emacs)
                 ("\\.mm\\'" . default) ("\\.x?html?\\'" . default) 
("\\.pdf\\'" . default))
 org-noter--pretty-print-location-for-title-hook 
'(org-noter-djvu--pretty-print-location org-noter-nov--pretty-print-location
                                                   
org-noter-pdf--pretty-print-location-for-title)
 org-odt-format-inlinetask-function 'org-odt-format-inlinetask-default-function
 org-ascii-format-drawer-function #[771 "\207" [] 4 "\n\n(fn NAME CONTENTS 
WIDTH)"]
 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 '(org-transclusion-font-lock-set 
doom-themes-enable-org-fontification)
 org-modules '(ol-bibtex)
 org-yank-image-file-name-function 'org-yank-image-autogen-filename
 org-image-actual-width nil
 org-attach-use-inheritance t
 org-noter--pretty-print-highlight-location-hook 
'(org-noter-pdf--pretty-print-highlight)
 org-mode-local-vars-hook '(+org-init-gifs-h)
 org-mode-hook '(er/add-org-mode-expansions toc-org-mode (closure (t) nil 
(org-zotxt-mode 1))
                 (closure ((hook . org-mode-hook)) (&rest _)
                  (progn
                   (let ((tail '(after-change-major-mode-hook)))
                    (while tail
                     (let ((hook (car tail)))
                      (let ((tail (list #'(lambda (&rest _) (if (derived-mode-p 
'org-mode) (progn (setq tab-width 8)))))))
                       (while tail (let ((func (car tail))) (add-hook hook func 
nil t) (setq tail (cdr tail)))))
                      (setq tail (cdr tail)))
                     )
                    )
                   )
                  (add-hook 'save-place-after-find-file-hook 
#'+org-make-last-point-visible-h nil t))
                 +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-appear-mode 
org-fancy-priorities-mode org-superstar-mode org-eldoc-load 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 embrace-org-mode-hook)
 org-src-window-setup 'other-window
 org-id-locations-file "/Users/nino/org/.orgids"
 org-link-file-path-type 'relative
 org-roam-ref-annotation-function 'org-roam-ref-read--annotation
 org-roam-directory "/Users/nino/ownCloud/org/roam/"
 org-noter--pretty-print-location-hook '(org-noter-djvu--pretty-print-location 
org-noter-nov--pretty-print-location org-noter-pdf--pretty-print-location)
 org-superstar-todo-bullet-alist '(("TODO" . 9744) ("[ ]" . 9744) ("DONE" . 
9745) ("[X]" . 9745))
 org-agenda-span 10
 org-latex-format-drawer-function #[514 "\207" [] 3 "\n\n(fn _ CONTENTS)"]
 org-priority-faces '((65 . error) (66 . warning) (67 . success))
 org-icalendar-use-scheduled '(todo-start event-if-todo event-if-not-todo)
 org-download-timestamp "_%Y%m%d_%H%M%S"
 org-roam-db-node-include-function #[0 "\300\207" [t] 1]
 org-roam-node-template-prefixes '(("doom-type" . "@") ("doom-tags" . "#") 
("tags" . "#") ("todo" . "t:"))
 org-download-abbreviate-filename-function '(closure (t) (path)
                                             (if (file-in-directory-p path 
org-download-image-dir) (file-relative-name path org-download-image-dir) path))
 org-latex-format-headline-function 'org-latex-format-headline-default-function
 org-reveal-root "file:///Users/nino/.doom.d/reveal.js"
 org-confirm-shell-link-function 'yes-or-no-p
 org-reveal-start-hook '(org-decrypt-entry)
 org-agenda-skip-unavailable-files t
 org-download-annotate-function '(closure (t) (_link) "")
 org-html-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
 org-web-tools-pandoc-sleep-time 3
 org-download-screenshot-method "screencapture -i %s"
 outline-isearch-open-invisible-function 'outline-isearch-open-invisible
 org-use-sub-superscripts '{}
 org-icalendar-include-todo t
 org-html-validation-link nil
 org-startup-indented t
 org-export-before-processing-hook 
'(org-blackfriday--reset-org-blackfriday--code-block-num-backticks)
 org-latex-classes '(("compterendu" "\\documentclass{scrartcl}}")
                     ("article" "\\documentclass[11pt]{article}" 
("\\section{%s}" . "\\section*{%s}") ("\\subsection{%s}" . "\\subsection*{%s}")
                      ("\\subsubsection{%s}" . "\\subsubsection*{%s}") 
("\\paragraph{%s}" . "\\paragraph*{%s}")
                      ("\\subparagraph{%s}" . "\\subparagraph*{%s}"))
                     ("report" "\\documentclass[11pt]{report}" ("\\part{%s}" . 
"\\part*{%s}") ("\\chapter{%s}" . "\\chapter*{%s}")
                      ("\\section{%s}" . "\\section*{%s}") ("\\subsection{%s}" 
. "\\subsection*{%s}") ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
                     ("book" "\\documentclass[11pt]{book}" ("\\part{%s}" . 
"\\part*{%s}") ("\\chapter{%s}" . "\\chapter*{%s}")
                      ("\\section{%s}" . "\\section*{%s}") ("\\subsection{%s}" 
. "\\subsection*{%s}") ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
                     )
 org-sort-function 'string-collate-lessp
 org-journal-carryover-items 
"TODO=\"TODO\"|TODO=\"PROJ\"|TODO=\"STRT\"|TODO=\"WAIT\"|TODO=\"HOLD\""
 org-highlight-latex-and-related '(native script entities)
 org-odt-format-headline-function 'org-odt-format-headline-default-function
 org-agenda-mode-hook '(+org-habit-resize-graph-h org-fancy-priorities-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-icalendar-timezone "Europe/Paris"
 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-icalendar-store-UID 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-safe-remote-resources 
'("\\`https://fniessen\\.github\\.io/org-html-themes/org/theme-readtheorg\\.setup\\'")
 org-hide-leading-stars t
 org-todo-keywords '((sequence "TODO(t)" "WAITING(w)" "IDEA(i)" "|" "DONE(d!)" 
"CANCELLED(c)"))
 org-agenda-inhibit-startup t
 org--warnings '("org-element--cache: Unregistered buffer modifications 
detected (19750 != 19751). Resetting.\nIf this warning appears regularly, 
please report the warning text to Org mode mailing list (M-x 
org-submit-bug-report).\nThe buffer is: jury_concours_IRHC_202407.org\n Current 
command: save-buffer\n Backtrace:\nnil" "org-element--cache: Unregistered 
buffer modifications detected (18113 != 18114). Resetting.\nIf this warning 
appears regularly, please report the warning text to Org mode mailing list (M-x 
org-submit-bug-report).\nThe buffer is: jury_concours_IRHC_202407.org\n Current 
command: save-buffer\n Backtrace:\nnil" "org-element--cache: Unregistered 
buffer modifications detected (9640 != 9641). Resetting.\nIf this warning 
appears regularly, please report the warning text to Org mode mailing list (M-x 
org-submit-bug-report).\nThe buffer is: jury_concours_IRHC_202407.org\n Current 
command: save-buffer\n Backtrace:\nnil" "org-element--cache: Unregistered 
buffer modifications detected (2005 != 2007). Resetting.\nIf this warning 
appears regularly, please report the warning text to Org mode mailing list (M-x 
org-submit-bug-report).\nThe buffer is: jury_concours_IRHC_202407.org\n Current 
command: save-buffer\n Backtrace:\nnil")
 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-noter--show-arrow-hook '(org-noter-pdf--show-arrow)
 org-preview-latex-image-directory 
"/Users/nino/.emacs.d/.local/cache/org/latex/"
 org-fontify-whole-heading-line t
 org-speed-command-hook '(org-speed-command-activate 
org-babel-speed-command-activate)
 org-html-format-inlinetask-function 
'org-html-format-inlinetask-default-function
 org-clock-persist-file "/Users/nino/.emacs.d/.local/etc/org-clock-save.el"
 org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
 org-eldoc-breadcrumb-separator " → "
 org-journal-mode-hook '(turn-on-visual-line-mode 
org-journal-default-enable-encryption)
 org-icalendar-use-deadline '(todo-due event-if-todo event-if-not-todo)
 org-latex-prefer-user-labels t
 org-odt-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
 org-noter--add-highlight-hook '(org-noter-pdf--highlight-location)
 org-persist-directory "/Users/nino/.emacs.d/.local/cache/org/persist/"
 org-icalendar-combined-name "Fernando Org"
 org-export-backends '(org md ascii html icalendar latex odt)
 org-icalendar-alarm-time 30
 org-roam-list-files-commands '(fd fdfind rg find)
 org-noter--get-current-view-hook '(org-noter-djvu--get-current-view 
org-noter-nov--get-current-view org-noter-pdf--get-current-view)
 org-enforce-todo-dependencies t
 org-noter-set-up-document-hook '(org-noter-djvu--setup-handler 
org-noter-nov--setup-handler org-noter-pdf--doc-view-setup-handler
                                  org-noter-pdf--pdf-view-setup-handler)
 org-confirm-babel-evaluate nil
 org-noter--get-containing-element-hook '(org-noter--get-containing-heading 
org-noter--get-containing-property-drawer)
 org-fold-core-isearch-open-function 'org-fold-core--isearch-reveal
 org-export-with-smart-quotes t
 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-latex-format-inlinetask-function 
'org-latex-format-inlinetask-default-function
 org-noter--convert-to-location-cons-hook 
'(org-noter-pdf--convert-to-location-cons)
 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-journal-file-type 'monthly
 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 "~/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-noter--get-precise-info-hook '(org-noter-djvu--get-precise-info 
org-noter-nov--get-precise-info org-noter-pdf--doc-view-get-precise-info
                                    org-noter-pdf--pdf-view-get-precise-info)
 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-fold-reveal-start-hook '(org-decrypt-entry)
 org-noter--get-highlight-location-hook '(org-noter-pdf--get-highlight)
 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-noter--doc-approx-location-hook '(org-noter-djvu--approx-location-cons 
org-noter-nov--approx-location-cons org-noter-pdf--approx-location-cons)
 org-roam-node-annotation-function 'org-roam-node-read--annotation
 org-link-parameters '(("zotero" :follow org-zotxt--link-follow :export 
org-zotxt--link-export)
                       ("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)
                       ("info" :follow org-info-open :export org-info-export 
:store org-info-store-link :insert-description org-info-description-as-command)
                       ("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))
                         )
                        )
                       ("bibtex" :follow org-bibtex-open :store 
org-bibtex-store-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 :store 
org-id-store-link-maybe) ("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\302Q\"\207" ["news" 
browse-url ":"] 6 "\n\n(fn URL ARG)"])
                       ("mailto" :follow #[514 "\301\300\302Q\"\207" ["mailto" 
browse-url ":"] 6 "\n\n(fn URL ARG)"])
                       ("https" :follow #[514 "\301\300\302Q\"\207" ["https" 
browse-url ":"] 6 "\n\n(fn URL ARG)"] :image-data-fun
                        +org-http-image-data-fn)
                       ("http" :follow #[514 "\301\300\302Q\"\207" ["http" 
browse-url ":"] 6 "\n\n(fn URL ARG)"] :image-data-fun +org-http-image-data-fn)
                       ("ftp" :follow #[514 "\301\300\302Q\"\207" ["ftp" 
browse-url ":"] 6 "\n\n(fn URL ARG)"])
                       ("shortdoc" :follow org-link--open-shortdoc :store 
org-link--store-shortdoc :complete org-link--complete-shortdoc)
                       ("help" :follow org-link--open-help :store 
org-link--store-help)
                       ("file" :complete org-link-complete-file :face
                        (closure (t) (path)
                         (if
                          (or (if (featurep :system 'windows) (string-prefix-p 
"//" path)) (file-remote-p path)
                           (if (featurep :system 'windows) (string-prefix-p 
"\\\\" path)) (file-exists-p path))
                          'org-link '(warning org-link))
                         )
                        )
                       ("elisp" :follow org-link--open-elisp))
 org-noter-get-buffer-file-name-hook '(org-noter-nov--get-buffer-file-name 
org-noter-pdf--get-buffer-file-name)
 org-journal-file-header "#+title: Week %W, %Y\n#+category: journal\n\n"
 org-html-format-headline-function 'org-html-format-headline-default-function
 org-roam-capture-templates '(("d" "default" plain "\n* %?" :if-new (file+head 
"%<%Y%m%d%H%M%S>-${slug}.org" "#+title: ${title}\n \n") :unnarrowed t)
                              ("p" "perso" plain "\n* %?" :if-new
                               (file+head "perso/%<%Y%m%d%H%M%S>-${slug}.org" 
"#+title: ${title}\n#+filetags: Perso\n \n") :unnarrowed t)
                              )
 org-metaup-hook '(org-babel-load-in-session-maybe)
 org-fancy-priorities-list '("Ⓐ" "Ⓑ" "Ⓒ" "Ⓓ")
 org-noter-get-selected-text-hook '(org-noter-djvu--get-selected-text 
org-noter-nov--get-selected-text org-noter-pdf--get-selected-text)
 org-noter-create-session-from-document-hook 
'(org-noter--create-session-from-document-file-default)
 org-superstar-leading-bullet 32
 org-startup-with-inline-images t
 org-imenu-depth 6
 org-download-link-format-function '(closure (t) (filename)
                                     (if (eq org-download-method 'attach)
                                      (format "[[attachment:%s]]\n" 
(org-link-escape (file-relative-name filename (org-attach-dir))))
                                      (format
                                       (concat (if (image-type-from-file-name 
filename) nil (concat (+org-attach-icon-for filename) " "))
                                        org-download-link-format)
                                       (org-link-escape (funcall 
org-download-abbreviate-filename-function filename)))
                                      )
                                     )
 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 '(("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-roam-indirect-buffer-hook '(org-roam--register-completion-functions-h)
 org-id-locations-file-relative t
 org-journal-file-format "%Y-%m-%d.org"
 org-noter-create-skeleton-functions '(org-noter-djvu--create-skeleton 
org-noter-nov--create-skeleton-epub org-noter-pdf--create-skeleton)
 org-archive-subtree-save-file-p t
 org-list-allow-alphabetical t
 )
-- 
  
Fernando NIÑO  
LEGOS/CTOH  
18, Av. Edouard Belin  
31401 Toulouse Cedex 9  
Tél: 05.61.33.47.38  



reply via email to

[Prev in Thread] Current Thread [Next in Thread]