From: Andrea <andrea-dev@hotmail.com>
To: emacs-orgmode@gnu.org
Subject: [BUG] org-babel-tangle may fail due to (org-babel-tangle-collect-blocks lang-re tangle-file) [9.6.9 ( @ /home/andrea/.emacs.d/elpa/org-9.6.9/)]
Date: Thu, 12 Oct 2023 11:33:57 +0100 [thread overview]
Message-ID: <AS8P193MB241369D9F0701F57E293429288D3A@AS8P193MB2413.EURP193.PROD.OUTLOOK.COM> (raw)
Hello, thanks for maintaining the great Org Mode!
I have been keeping a literate Org Mode configuration for my init file.
This means that I have tons of src blocks looking like
#+begin_src emacs-lisp :tangle yes
...
#+end_src
Sometimes I get an error on org-babel-load-file saying that
org-babel-tangle-collect-blocks was called with target-file set to nil.
Not totally sure if this is had something to do with my configuration, I
always solved this by adding some spaces before my blocks (it doesn't
make sense, but strangely tended to work).
Since that seems an effective but senseless action, I just looked into it and there is
something weird in the code of org-babel-tangle:
Given the header of the function:
(defun org-babel-tangle (&optional arg target-file lang-re)
and the docstring section
"Optional argument TARGET-FILE can be used to specify a default export
file for all source blocks. "
I think this let binding in org-babel-tangle is weird and the cause of my error:
(tangle-file
(when (equal arg '(16))
(or (cdr (assq :tangle (nth 2 (org-babel-get-src-block-info 'no-eval))))
(user-error "Point is not in a source code block"))))
Shouldn't that be:
(tangle-file
(or
(when (equal arg '(16))
(or (cdr (assq :tangle (nth 2 (org-babel-get-src-block-info 'no-eval))))
(user-error "Point is not in a source code
block")))
target-file ;; the target file which was passed as input of org-babel-tangle
))
With that my problem seems resolved. I think that code is weird because
using a when clause causes a possible nil value for that binding. But we
may still use the target-file input to save the day, no?
Any chance I found a bug?
Best,
Andrea
Emacs : GNU Emacs 28.1 (build 1, x86_64-pc-linux-gnu, GTK+ Version 3.24.33, cairo version 1.16.0)
of 2022-05-31
Package: Org mode version 9.6.9 ( @ /home/andrea/.emacs.d/elpa/org-9.6.9/)
next reply other threads:[~2023-10-12 11:33 UTC|newest]
Thread overview: 10+ messages / expand[flat|nested] mbox.gz Atom feed top
2023-10-12 10:33 Andrea [this message]
2023-10-12 13:04 ` [BUG] org-babel-tangle may fail due to (org-babel-tangle-collect-blocks lang-re tangle-file) [9.6.9 ( @ /home/andrea/.emacs.d/elpa/org-9.6.9/)] Ihor Radchenko
2023-10-12 14:16 ` Andrea
2023-10-12 14:40 ` Ihor Radchenko
2023-10-12 14:50 ` Andrea
2023-10-12 15:29 ` Ihor Radchenko
2023-10-12 15:46 ` Andrea
2023-10-13 11:56 ` Ihor Radchenko
2023-11-24 13:38 ` Andrea
2023-12-05 11:28 ` Ihor Radchenko
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.orgmode.org/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=AS8P193MB241369D9F0701F57E293429288D3A@AS8P193MB2413.EURP193.PROD.OUTLOOK.COM \
--to=andrea-dev@hotmail.com \
--cc=emacs-orgmode@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
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).