From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mp10.migadu.com ([2001:41d0:8:6d80::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by ms9.migadu.com with LMTPS id sO46DfeVQ2Q+JAAASxT56A (envelope-from ) for ; Sat, 22 Apr 2023 10:08:23 +0200 Received: from aspmx1.migadu.com ([2001:41d0:8:6d80::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by mp10.migadu.com with LMTPS id uCJGDPeVQ2THegEAG6o9tA (envelope-from ) for ; Sat, 22 Apr 2023 10:08:23 +0200 Received: from lists.gnu.org (lists.gnu.org [209.51.188.17]) (using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits)) (No client certificate requested) by aspmx1.migadu.com (Postfix) with ESMTPS id A01871FD96 for ; Sat, 22 Apr 2023 10:08:22 +0200 (CEST) Received: from localhost ([::1] helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1pq8HP-0004qL-1J; Sat, 22 Apr 2023 04:07:35 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1ppeOM-0002nx-EZ for emacs-orgmode@gnu.org; Thu, 20 Apr 2023 20:12:46 -0400 Received: from mail-ej1-x62a.google.com ([2a00:1450:4864:20::62a]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1ppeOH-0003lk-MW for emacs-orgmode@gnu.org; Thu, 20 Apr 2023 20:12:46 -0400 Received: by mail-ej1-x62a.google.com with SMTP id a640c23a62f3a-94a34d3812cso148716866b.2 for ; Thu, 20 Apr 2023 17:12:40 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20221208; t=1682035959; x=1684627959; h=content-transfer-encoding:to:subject:message-id:date:from :mime-version:from:to:cc:subject:date:message-id:reply-to; bh=yvYL3IkhsvUA+g2ISBQRahHWZIIXDTCGWZqAqgiWk4M=; b=OIybTB/4hOoVN989TBqOH4/k1DYQdDB6JtidjMRsrTmUA4eeQDoTOP/ACgkxH0MId8 +V9HZ2da4eTlo9ZCUOB+hUqYfi2vcD4zv9EbAiqw9rRsbjXbV5fbHrVob3usiO1mh5xU Z0FRUuO716HWxXZe3hWg/47qRUCp2wdhn7tXauSvbDHfosFESeVzjZAHNvVDReU+stdx aXPLT0Fr0AkZKBvbG8f9x/P88kij1UcmOWuK3BS3QvdmCRvxw6Zbs+ZbUxwrYd6k3Pxb 5kJ0a1U7030TZV+OWbm25sAGeWO+eoxEezPj64XgeadiXs1OGPnXJQoczz2xjeQfWVQ9 ZdYQ== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20221208; t=1682035959; x=1684627959; h=content-transfer-encoding:to:subject:message-id:date:from :mime-version:x-gm-message-state:from:to:cc:subject:date:message-id :reply-to; bh=yvYL3IkhsvUA+g2ISBQRahHWZIIXDTCGWZqAqgiWk4M=; b=D5xtA+70/kMHFXKvXvA9/BbA7BlrrglTa3GCjOpU0hToNyJoS5FOa106WTVkIHouee sb1th/Bz/MAPPguvXrYo/euo+lK3SOxpiCDMt83RBz7CTBcjWHmC8sj0zYAxu7eOusSS sfG0yFJ1nyKdERBIxLy1+OjD3G5thRA/NOlm8CO8aqxnuVnLnlVyQwT3w3A4SdKPa7HH kGdi4DxcpvVvocon3YewmurZTE98jjOazhu2OZPfMvuZqaDe3E9v5h4z46hImdOLCHHu 8ls84bvgNvCTMLL203urxhPQH41RePE1Q3J5079ZdVJaLRXyUi7etWwdA2EY9UmVM0cm W65g== X-Gm-Message-State: AAQBX9fjHs41euIPRVpddyWuVDBGb0CXQHoVD29BbqnJLgfFoBIdl67O eWpffJwRkxTVAT78miSp/In7X3pq22Nn+EYlsI9UeuuouNg= X-Google-Smtp-Source: AKy350b19qAIK9UZqAKeTWEVZDt+/vgwUYku5BKHv+VzudUVBuU89vpYfvk8mm3AFcqRI5eMqDr4qjhVJ4nxRFQwAdw= X-Received: by 2002:a17:907:78d2:b0:94e:8fef:863c with SMTP id kv18-20020a17090778d200b0094e8fef863cmr334968ejc.0.1682035958309; Thu, 20 Apr 2023 17:12:38 -0700 (PDT) MIME-Version: 1.0 From: Weaver Marquez Date: Thu, 20 Apr 2023 17:12:26 -0700 Message-ID: Subject: [BUG] Babel Noweb and python name clashing [9.6.1 (9.6.1-??-fe92a3ced @ /var/home/kwalerie/.emacs.d/.local/straight/build-27.1/org/)] To: emacs-orgmode@gnu.org Content-Type: text/plain; charset="UTF-8" Content-Transfer-Encoding: quoted-printable Received-SPF: pass client-ip=2a00:1450:4864:20::62a; envelope-from=weavermarquez0@gmail.com; helo=mail-ej1-x62a.google.com X-Spam_score_int: -18 X-Spam_score: -1.9 X-Spam_bar: - X-Spam_report: (-1.9 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1, DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1, DKIM_VALID_EF=-0.1, FREEMAIL_ENVFROM_END_DIGIT=0.25, FREEMAIL_FROM=0.001, RCVD_IN_DNSWL_NONE=-0.0001, SPF_HELO_NONE=0.001, SPF_PASS=-0.001, T_SCC_BODY_TEXT_LINE=-0.01 autolearn=ham autolearn_force=no X-Spam_action: no action X-Mailman-Approved-At: Sat, 22 Apr 2023 04:07:34 -0400 X-BeenThere: emacs-orgmode@gnu.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+larch=yhetil.org@gnu.org Sender: emacs-orgmode-bounces+larch=yhetil.org@gnu.org X-Migadu-Flow: FLOW_IN X-Migadu-Country: US ARC-Seal: i=1; s=key1; d=yhetil.org; t=1682150902; a=rsa-sha256; cv=none; b=MGpBZ5iS3t5vTaXms2wyoNASFkdbxH8X1CuX/5Ee/YrTvYysZEG4wJs5il1WbXJTiunh/3 7ll6/4r4svJWfIteL/o6JeNCA2rzIzRabk8GCMR4t3x9Nsw4bMiFCmrx8/80ir0WXGUKN1 bRh9m0S4OdMJNMfOt1I88qVabg/Zz9+wIffjePW7uEcd0KpgxeElK3H7UvSC+LZfX8Ztek 2be0QoejmgzlQCVYrJf8SjhQZzbNg4dw60OE5CVRh8mxEmOGWZq0vGaEqrF0mGKfTgbaF9 KkaMPn6N9RvubRYb2PMgLW1XctXGTW0VitwcMt4rYJvutNHCzlX0eKFJIEMNJA== ARC-Authentication-Results: i=1; aspmx1.migadu.com; dkim=pass header.d=gmail.com header.s=20221208 header.b="OIybTB/4"; dmarc=pass (policy=none) header.from=gmail.com; spf=pass (aspmx1.migadu.com: domain of "emacs-orgmode-bounces+larch=yhetil.org@gnu.org" designates 209.51.188.17 as permitted sender) smtp.mailfrom="emacs-orgmode-bounces+larch=yhetil.org@gnu.org" ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=yhetil.org; s=key1; t=1682150902; h=from:from:sender:sender:reply-to:subject:subject:date:date: message-id:message-id:to:to:cc:mime-version:mime-version: content-type:content-type: content-transfer-encoding:content-transfer-encoding:list-id:list-help: list-unsubscribe:list-subscribe:list-post:dkim-signature; bh=yvYL3IkhsvUA+g2ISBQRahHWZIIXDTCGWZqAqgiWk4M=; b=rxZ5W62qooMa7V315Aq+LQ15n8W/D/Hq856RxNmZb9MEVCvCJq84hG6b4tb3sRsVogT9ax Pr9utNNvnZc/tLDmIpB8NtOp8YHdEQvYPuEbwxZKRZlBiPjOfCi7Rq5EF0WsGPOerTJMrR gRB08E3GnXkBbsY3NS41IqudX9crCwbQoxFnx/JW/4f9AXygwbvdwTe7zQ7YpdzjDCD1SM 8RIsHpSXHm0HGXN8JxtNnEDXnPjHxhA2Eyl3z1rOkHiTCYAQ/tadtcBOVp4sGQxKE7b+US odADup6AX3onugsgLkPkjf1SJdFu2UmF7FAckMN0cxbudmo1NKJykJuzWiD1/g== X-Migadu-Scanner: scn1.migadu.com Authentication-Results: aspmx1.migadu.com; dkim=pass header.d=gmail.com header.s=20221208 header.b="OIybTB/4"; dmarc=pass (policy=none) header.from=gmail.com; spf=pass (aspmx1.migadu.com: domain of "emacs-orgmode-bounces+larch=yhetil.org@gnu.org" designates 209.51.188.17 as permitted sender) smtp.mailfrom="emacs-orgmode-bounces+larch=yhetil.org@gnu.org" X-Migadu-Spam-Score: -5.44 X-Spam-Score: -5.44 X-Migadu-Queue-Id: A01871FD96 X-TUID: 6ESYBVDfp9xh Following the Worg documentation for python babel linked [[here][https://orgmode.org/worg/org-contrib/babel/languages/ob-doc-python.= html]], I had a lot of trouble with the =3Dsavefig=3D related examples. Expected Behaviour: The two code snippets below have the exact same code, except one has its Babel name as =3Dsavefig=3D, which is a function name inside its code block, and the other doesn't. Not sure if this is a documented issue, but figured I should mention. =3D=3D---=3D=3D #+name: savefig #+begin_src python :var filename=3D"images/python-matplot-figure.png" return f"plt.savefig('{filename}')\nreturn '{filename}'" #+end_src #+name: substitute #+begin_src python :var filename=3D"images/python-matplot-figure.png" return f"plt.savefig('{filename}')\nreturn '{filename}'" #+end_src =3D=3D---=3D=3D #+name: doesnt-work #+begin_src python :noweb yes :results file import matplotlib, numpy import matplotlib.pyplot as plt #matplotlib.use('Agg') fig=3Dplt.figure(figsize=3D(4,2)) x=3Dnumpy.linspace(-15,15) plt.plot(numpy.sin(x)/x) fig.tight_layout() <> #+end_src #+name: does-work #+begin_src python :noweb yes :results file import matplotlib, numpy import matplotlib.pyplot as plt #matplotlib.use('Agg') fig=3Dplt.figure(figsize=3D(4,2)) x=3Dnumpy.linspace(-15,15) plt.plot(numpy.sin(x)/x) fig.tight_layout() <> #+end_src Emacs : GNU Emacs 27.1 (build 1, x86_64-pc-linux-gnu, GTK+ Version 3.24.30, cairo version 1.16.0) of 2022-01-24, modified by Debian Package: Org mode version 9.6.1 (9.6.1-??-fe92a3ced @ /var/home/kwalerie/.emacs.d/.local/straight/build-27.1/org/) current state: =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D (setq org-src-mode-hook '(org-src-babel-configure-edit-buffer org-src-mode-configure-edit-buffer) org-fontify-whole-heading-line t org-link-shell-confirm-function 'yes-or-no-p org-mode-local-vars-hook '(+org-init-gifs-h) org-babel-after-execute-hook '(+org-redisplay-inline-images-in-babel-resul= t-h) org-insert-heading-respect-content t org-after-refile-insert-hook '(save-buffer) org-metadown-hook '(org-babel-pop-to-session-maybe) org-follow-link-hook '(+nav-flash-delayed-blink-cursor-h) org-persist-directory "/var/home/kwalerie/.emacs.d/.local/cacheorg/persist= /" org-refile-targets '((nil :maxlevel . 3) (org-agenda-files :maxlevel . 3)) org-html-format-inlinetask-function 'org-html-format-inlinetask-default-function org-enforce-todo-dependencies t org-odt-format-headline-function 'org-odt-format-headline-default-function org-special-ctrl-a/e t org-imenu-depth 6 org-persist-before-write-hook '(org-element--cache-persist-before-write) org-agenda-files '("/var/home/kwalerie/org/todo.org" "/var/home/kwalerie/org/2023-02-06-healthsci.org" "/var/home/kwalerie/org/battery.org" "/var/home/kwalerie/org/draft.org") org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default org-reveal-start-hook '(org-decrypt-entry) org-modules '(ol-bibtex) org-startup-folded nil org-blocker-hook '(org-block-todo-from-children-or-siblings-or-parent) org-mode-hook '(er/add-org-mode-expansions +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-fold-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\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 evil-org-mode toc-org-enable embrace-org-mode-hook org-eldoc-load) org-clock-persist 'history org-export-with-smart-quotes t org-odt-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"] org-outline-path-complete-in-steps nil org-archive-hook '(org-attach-archive-delete-maybe) org-persist-before-read-hook '(org-element--cache-persist-before-read) org-agenda-finalize-hook '(+org-exclude-agenda-buffers-from-workspace-h +org-defer-mode-in-agenda-buffers-h) org-startup-indented t org-clock-history-length 20 org-agenda-before-write-hook '(org-agenda-add-entry-text) org-metaup-hook '(org-babel-load-in-session-maybe) org-persist-after-read-hook '(org-element--cache-persist-after-read) org-bibtex-headline-format-function #[257 "\300\236A\207" [:title] 3 "\n\n(fn ENTRY)"] org-latex-format-drawer-function #[514 "\207" [] 3 "\n\n(fn _ CONTENTS)"] org-agenda-deadline-faces '((1.001 . error) (1.0 . org-warning) (0.5 . org-upcoming-deadline) (0.0 . org-upcoming-distant-deadline)) org-crypt-key nil org-babel-pre-tangle-hook '(save-buffer) org-file-apps '((remote . emacs) (auto-mode . emacs) (directory . emacs) ("\\.mm\\'" . default) ("\\.x?html?\\'" . default) ("\\.pdf\\'" . default)) 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-hide-leading-stars t org-babel-load-languages '((:noweb . t) (text . t) (nil . t) (python3 . t) (python . t) (emacs-lisp . t)) 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-link-abbrev-alist '(("doomdir" . "/var/home/kwalerie/.doom.d/%s") ("emacsdir" . "/var/home/kwalerie/.emacs.d/%s") ("doom-repo" . "https://github.com/doomemacs/doomemacs/%s") ("wolfram" . "https://wolframalpha.com/input/?i=3D%s") ("wikipedia" . "https://en.wikipedia.org/wiki/%s") ("duckduckgo" . "https://duckduckgo.com/?q=3D%s") ("gmap" . "https://maps.google.com/maps?q=3D%s") ("gimages" . "https://google.com/images?q=3D%s") ("google" . "https://google.com/search?q=3D") ("youtube" . "https://youtube.com/watch?v=3D%s") ("github" . "https://github.com/%s")) org-export-backends '(md ascii html icalendar latex odt) org-clock-in-resume t org-ascii-format-drawer-function #[771 "\207" [] 4 "\n\n(fn NAME CONTENTS WIDTH)"] org-attach-store-link-p 'attached 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-archive-subtree-save-file-p t org-agenda-span 10 org-babel-python-command "python3" org-agenda-loop-over-headlines-in-active-region nil org-src-lang-modes '(("jupyter-R" . R) ("jupyter-julia" . julia) ("jupyter-python" . python) ("md" . markdown) ("C" . c) ("C++" . c++) ("asymptote" . asy) ("bash" . sh) ("beamer" . latex) ("calc" . fundamental) ("cpp" . c++) ("ditaa" . artist) ("desktop" . conf-desktop) ("dot" . fundamental) ("elisp" . emacs-lisp) ("ocaml" . tuareg) ("screen" . shell-script) ("shell" . sh) ("sqlite" . sql) ("toml" . conf-toml)) org-src-preserve-indentation t org-fontify-quote-and-verse-blocks t org-fold-core-isearch-open-function 'org-fold--isearch-reveal org-occur-hook '(org-first-headline-recenter) org-agenda-mode-hook '(+org-habit-resize-graph-h evil-org-agenda-mode) org-agenda-window-setup 'current-window org-fold-reveal-start-hook '(org-decrypt-entry) org-indirect-buffer-display 'current-window 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-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-speed-command-hook '(org-speed-command-activate org-babel-speed-command-activate) org-tags-column 0 org-capture-mode-hook '(+org-show-target-in-capture-header-h evil-insert-s= tate) org-clock-persist-file "/var/home/kwalerie/.emacs.d/.local/etcorg-clock-save.el" org-attach-id-dir "/var/home/kwalerie/org/.attach/" org-M-RET-may-split-line nil org-odt-format-inlinetask-function 'org-odt-format-inlinetask-default-func= tion org-latex-prefer-user-labels t org-babel-tangle-lang-exts '(("python" . "py") ("emacs-lisp" . "el") ("elisp" . "el")) org-publish-timestamp-directory "/var/home/kwalerie/.emacs.d/.local/cacheorg/timestamps/" org-display-remote-inline-images 'download org-refile-use-outline-path 'file org-priority-faces '((65 . error) (66 . warning) (67 . success)) org-export-before-parsing-hook '(org-attach-expand-links) org-font-lock-set-keywords-hook '(doom-themes-enable-org-fontification) org-id-locations-file "/var/home/kwalerie/org/.orgids" org-confirm-shell-link-function 'yes-or-no-p 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 nil) (dir-var closure (t) nil (or org-download-image-dir org-attach-id-dir ".")) (key . "download") t) 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 ".")) (requires . org-download) (plist :image-data-fun +org-image-file-data-fn :requires nil) (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 nil) (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 :requires n= il) ("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)) ) ) ("denote" :follow denote-link-ol-follow :face denote-faces-link :complete denote-link-ol-complete :store denote-link-ol-store :export denote-link-ol-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) ("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-changelog" :follow (closure ((old) (vnew closure ((-call-interactively) t) (fn) #'(lambda (path _prefixarg) (funcall fn (or (intern-soft path) (user-error "Can't find documentation for %S" path))))) (-call-interactively) t) (link) (find-file (doom-path doom-docs-dir "changelog.org")) (org-match-sparse-tree nil link)) ) ("doom-user" :follow (closure ((old) (vnew closure ((-call-interactively) t) (fn) #'(lambda (path _prefixarg) (funcall fn (or (intern-soft path) (user-error "Can't find documentation for %S" path))))) (-call-interactively) t) (link) (browse-url (format "https://github.com/%s" (string-remove-prefix "@" (+org-link-read-desc-at-point link))))) :face (closure ((old) (vnew closure ((-call-interactively) t) (fn) #'(lambda (path _prefixarg) (funcall fn (or (intern-soft path) (user-error "Can't find documentation for %S" path))))) (-call-interactively) t) (_) 'org-priority) ) ("doom-ref" :follow (closure ((old) (vnew closure ((-call-interactively) t) (fn) #'(lambda (path _prefixarg) (funcall fn (or (intern-soft path) (user-error "Can't find documentation for %S" path))))) (-call-interactively) t) (link) (let ((link (+org-link-read-desc-at-point link)) (url "https://github.com") (doom-repo "doomemacs/doomemacs")) (let ((save-match-data-internal (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" lin= k))) ) ) (set-match-data save-match-data-internal 'evaporate)) ) ) ) :face (closure ((old) (vnew closure ((-call-interactively) t) (fn) #'(lambda (path _prefixarg) (funcall fn (or (intern-soft path) (user-error "Can't find documentation for %S" path))))) (-call-interactively) 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-follow-doom-module-fn :activate-func +org-link--doom-module-link-activate-fn :face +org-link--doom-module-link-face-fn :help-echo +org-link-doom--help-echo-from-textprop) ("doom-package" :follow +org-link-follow-doom-package-fn :activate-func +org-link--doom-package-link-activate-fn :face (closure ((old) (vnew closure ((-call-interactively) t) (fn) #'(lambda (path _prefixarg) (funcall fn (or (intern-soft path) (user-error "Can't find documentation for %S" path))))) (-call-interactively) t) (_) '(:inherit org-priority :slant italic)) :help-echo +org-link-doom--help-echo-from-textprop) ("cmd" :follow (closure ((fn . describe-command) (-call-interactively) t) (path _prefixarg) (funcall fn (or (intern-soft path) (user-error "Can't find documentation for %S" path)))) :activate-func +org-link--command-link-activate-command :face help-key-binding :help-echo +org-link-doom--help-echo-from-textprop) ("face" :follow (closure ((fn . describe-face) (-call-interactively) t) (path _prefixarg) (funcall fn (or (intern-soft path) (user-error "Can't find documentation for %S" path)))) :activate-func +org-link--face-link-activate-face :face (font-lock-type-face underline)) ("fn" :follow (closure ((fn . helpful-callable) (-call-interactively) t) (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 org-code) ("var" :follow (closure ((fn . helpful-variable) (-call-interactively) t) (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 org-code) ("kbd" :follow (closure ((old) (vnew closure ((-call-interactively) t) (fn) #'(lambda (path _prefixarg) (funcall fn (or (intern-soft path) (user-error "Can't find documentation for %S" path))))) (-call-interactively) 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 ((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 (ensure-list 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)) ) :requires nil) ("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 (ensure-list 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)) ) :requires nil) ("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 (ensure-list 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)) ) :requires nil) ("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 (ensure-list 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)) ) :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)"]) ("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-latex-format-headline-function 'org-latex-format-headline-default-func= tion org-capture-templates '(("n" "New note (with denote.el)" plain (file denote-last-path) #'denote-org-capture :no-save t :immediate-finish nil :kill-buffer t :jump-to-captured t) ("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-link-translation-function 'toc-org-unhrefify org-link-elisp-confirm-function nil 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-after-finalize-hook '(denote-org-capture-delete-empty-file +org-capture-cleanup-frame-h) org-latex-format-inlinetask-function 'org-latex-format-inlinetask-default-function org-html-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"= ] org-image-actual-width nil org-eldoc-breadcrumb-separator " =E2=86=92 " org-html-format-headline-function 'org-html-format-headline-default-functi= on org-entities-user '(("flat" "\\flat" nil "" "" "266D" "=E2=99=AD") ("sharp= " "\\sharp" nil "" "" "266F" "=E2=99=AF")) org-src-window-setup 'other-window org-clock-out-remove-zero-time-clocks t org-confirm-babel-evaluate nil org-use-sub-superscripts '{} org-directory "~/org/" org-preview-latex-image-directory "/var/home/kwalerie/.emacs.d/.local/cacheorg/latex/" org-tags-exclude-from-inheritance '("crypt") org-html-validation-link nil org-attach-use-inheritance t org-agenda-inhibit-startup t org-agenda-start-on-weekday nil org-default-notes-file "/var/home/kwalerie/org/notes.org" org-id-locations-file-relative t org-list-allow-alphabetical t org-agenda-skip-unavailable-files t )