From: aditya siram <aditya.siram@gmail.com>
To: emacs-orgmode@gnu.org
Subject: Re: [SOLVED] [org-babel] References Not Expanding
Date: Sun, 22 Aug 2010 16:21:58 -0500 [thread overview]
Message-ID: <AANLkTimX5EZwjUuegPRpDLnazPRq-kB3_OYVXWjatE1w@mail.gmail.com> (raw)
In-Reply-To: <AANLkTinPyATL6OLUt5FCaP4GyQb06P0jFyxD6NiYbfpu@mail.gmail.com>
[-- Attachment #1.1: Type: text/plain, Size: 970 bytes --]
The function that loads the code block into the interpreter
org-babel-load-in-session does not do noweb reference expansion.
I have included a git patch that adds that functionality.
-deech
On Sat, Aug 21, 2010 at 4:42 PM, aditya siram <aditya.siram@gmail.com>wrote:
> Hi all,
> I have the development version of org-mode and org-babel noweb style
> references are not expanding during evaluation, they are instead copied
> literally into the temp file. They seem to expand fine when tangling. Here
> is file that is failing:
> * Root
> #+begin_src haskell :noweb yes :tangle Main.hs
> <<Imports>>
> <<Test>>
> main = print $ test [1,2,3]
> #+end_src
>
> * Imports
> #+srcname: Imports
> #+begin_src haskell
> import Control.Monad.State
> #+end_src
>
> * Append Function
> #+srcname: Test
> #+begin_src haskell
> test = length
> #+end_src
>
> I have tried unsuccessfully to make "Imports" and "Append Function"
> children of "Root".
>
> Thanks!
> -deech
>
[-- Attachment #1.2: Type: text/html, Size: 1337 bytes --]
[-- Attachment #2: noweb_references_expand_on_session_load.patch --]
[-- Type: text/x-diff, Size: 1000 bytes --]
From eeeece26be443438325bb985488bddc784432e97 Mon Sep 17 00:00:00 2001
From: Aditya Siram <aditya.siram@gmail.com>
Date: Sun, 22 Aug 2010 16:12:17 -0500
Subject: [PATCH] Noweb style references are now expanded with loading a code block in a session.
---
lisp/ob.el | 6 +++++-
1 files changed, 5 insertions(+), 1 deletions(-)
diff --git a/lisp/ob.el b/lisp/ob.el
index 8557f09..2ecc1db 100644
--- a/lisp/ob.el
+++ b/lisp/ob.el
@@ -421,8 +421,12 @@ session."
(interactive)
(let* ((info (or info (org-babel-get-src-block-info)))
(lang (nth 0 info))
- (body (nth 1 info))
(params (nth 2 info))
+ (body (setf (nth 1 info)
+ (if (and (cdr (assoc :noweb params))
+ (string= "yes" (cdr (assoc :noweb params))))
+ (org-babel-expand-noweb-references info)
+ (nth 1 info))))
(session (cdr (assoc :session params)))
(dir (cdr (assoc :dir params)))
(default-directory
--
1.7.0.4
[-- Attachment #3: Type: text/plain, Size: 201 bytes --]
_______________________________________________
Emacs-orgmode mailing list
Please use `Reply All' to send replies to the list.
Emacs-orgmode@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode
next prev parent reply other threads:[~2010-08-22 21:22 UTC|newest]
Thread overview: 4+ messages / expand[flat|nested] mbox.gz Atom feed top
2010-08-21 21:42 [org-babel] References Not Expanding aditya siram
2010-08-22 21:21 ` aditya siram [this message]
2010-08-22 21:32 ` [SOLVED] " aditya siram
2010-08-25 18:22 ` Eric Schulte
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
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=AANLkTimX5EZwjUuegPRpDLnazPRq-kB3_OYVXWjatE1w@mail.gmail.com \
--to=aditya.siram@gmail.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 external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.