[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[O] [babel] would like to to do simple text block expansion with paramet
From: |
Olaf.Hamann |
Subject: |
[O] [babel] would like to to do simple text block expansion with parameters or multiline macro replacement text |
Date: |
Sat, 07 Apr 2012 19:22:00 +0200 |
User-agent: |
Mozilla/5.0 (Windows NT 5.0; rv:11.0) Gecko/20120327 Thunderbird/11.0.1 |
Hello all,
I'm very happy with all the new features I discovered in org-babel
(since 6.8 or so) and played around a lot trying to convert my old
funnelweb-techniques (kind of LPstuff) into org-babel and now I'm a
little confused with all that elaborated stuff like header arguments,
result options :var types and function calls and so on :-)
Is there an easy way to do a simple text block expansion with
parameters, I mean sth like this:
#+begin_src xsl :tangle outputfile :noweb tangle
{{{gCV(argument1,param2)}}}
<<other_srcblockvalueWhenTangeling()>>
#+end_src
#+MACRO: gCV replacement text...
...spread over different...
...multiple lines with arguments like $1 ...
...and $2 and so on...
...
#+end_macro
Multiline macros did not work in my tries (Org version 7.8.03 with Emacs
version 24)
For expanding macros inside srcblocks I got this hint from the list some
time ago what works really fine:
#+begin_src emacs-lisp :results silent :exports none
(add-hook 'org-babel-tangle-body-hook
(lambda () (org-export-preprocess-apply-macros)))
#+end_src
Below I give an executable example in org-code. It's stripped down from
my work.
It works fine, but I would like to get rid of the lisp-concat and
string-quoting and wonder if org-mode does not offer another way.
Thank you very much in advance,
Olaf
====
* simple text block expansion with parameters
#+NAME: gCV(PDEF="param_pdef",XPATH="param_value")
#+begin_src emacs-lisp :results value :exports results :noweb tangle
(concat
" <xsl:when test=\"$pdef-identifier = '" PDEF "'\">
<xsl:value-of select=\"" XPATH "\" />
</xsl:when> " )
#+end_src
#+begin_src xsl :tangle mappings.xslt :noweb tangle
<xsl:variable name="oneOfMany">
<xsl:choose>
<<gCV("Condition001","$tree/some/node/@value")>>
<<gCV("Condition002","$tree/some/other/node/text()")>>
<xsl:otherwise/>
</xsl:choose>
</xsl:variable>
#+end_src
====
Output looks like expected:
<xsl:variable name="oneOfMany">
<xsl:choose>
<xsl:when test="$pdef-identifier = 'Condition001'">
<xsl:value-of select="$tree/some/node/@value" />
</xsl:when>
<xsl:when test="$pdef-identifier = 'Condition002'">
<xsl:value-of select="$tree/some/other/node/text()" />
</xsl:when>
<xsl:otherwise/>
</xsl:choose>
</variable>
- [O] [babel] would like to to do simple text block expansion with parameters or multiline macro replacement text,
Olaf.Hamann <=