Escribir el preámbulo de LaTeX en Org mediante un bloque de código

Para mis proyectos «de envergadura» en Org Mode (trabajos de composición tipográfica, por lo general, que suponen libros extensos y complejos) suelo definir el preámbulo de LATEX en un documento aparte, generado desde otro documento de Org, muy detallado, mediante la funcionalidad org-babel-tangle. Y para los documentos rápidos del día a día tengo una serie de plantillas y clases ya preparadas («clases», entiéndase, más en la manera que las entiende Org, es decir, lo que cargamos mediante la directiva #+org-LaTeX-class:). El problema está en los documentos de escala intermedia, donde necesitamos escribir un preámbulo ad hoc, definir ciertas macros, probar este u otro paquete y demás. Como sabe cualquier usuario medio de Org Mode, las líneas del preámbulo de cara a la exportación a LATEX se escriben en org mediante la directiva (o «keyword») #+LaTeX_Header:. Pero aquí viene el engorro. Lo que escribimos así debe estar siempre en una línea. A poco que el preámbulo tenga algo de complejidad tendremos que añadir múltiples líneas que comiencen con #+LaTeX_Header:, y esto, naturalmente, supone una tarea pesada y tediosa. ¿Por qué no escribir, mejor, nuestro preámbulo dentro de un bloque de código LATEX? Las ventajas son obvias: tendremos más libertad de escritura (no hace falta añadir la dichosa directiva antes de cada línea) y además lo podemos hacer con el LaTeX-mode activado, puesto que estamos dentro de un bloque LATEX y seremos capaces de editarlo siempre que queramos. Veremos en esta GNUta varias maneras de conseguir esto.

Antes de nada, partamos de un preámbulo de ejemplo (con unas cuantas declaraciones y un poco de código Lua introducido mediante la primitiva directlua), que escribiremos en un bloque LATEX, con el argumento de cabecera («header argument») para que nos silencie los resultados y los exporte:

#+NAME:preamble
#+begin_src latex :results silent :exports results
  \usepackage{luacode}
  \usepackage{fontspec}
  \directlua
  {
  fonts.handlers.otf.addfeature
  {
     name = "ktest",
     type = "kern",
     data =
        {
           ["A"] = { ["V"] = -45 },
        },
  }
  }
  \setmainfont{Linux Libertine O}
  [RawFeature={+ktest}]
#+end_src

#+begin_src emacs-lisp :var x=preamble :results raw :exports results
  (let* ((lines (split-string x "\n" nil))
         (headers (mapconcat (lambda
                           (line)
                           (unless (equal line "")
                             (format "#+LaTeX_Header: %s" line)))
                         lines "\n")))
    headers)
#+end_src

#+RESULTS:
#+LaTeX_Header: \usepackage{luacode}
#+LaTeX_Header: \usepackage{fontspec}
#+LaTeX_Header: \directlua
#+LaTeX_Header: {
#+LaTeX_Header: fonts.handlers.otf.addfeature
#+LaTeX_Header: {
#+LaTeX_Header:    name = "ktest",
#+LaTeX_Header:    type = "kern",
#+LaTeX_Header:    data =
#+LaTeX_Header:       {
#+LaTeX_Header:  ["A"] = { ["V"] = -45 },
#+LaTeX_Header:       },
#+LaTeX_Header: }
#+LaTeX_Header: }
#+LaTeX_Header: \setmainfont{Linux Libertine O}
#+LaTeX_Header: [RawFeature={+ktest}]

#+begin_src latex :noweb yes :results raw
,#+LaTeX_HEADER: <<preamble>>
#+end_src