; -*- mode: emacs-lisp; mode:outline-minor; outline-regexp:";;;;* [^    \n]" -*-

; Aquí está la configuración necesaria para que org-publish pueda exportar mi página web
;
; 18.m8.2009: en realidad está lejos de ser usable pues exporta demasiado y sin mucha fiabilidad ni verbosidad. Pero sigo probando
;

(let
(
(preámbulo-al-publicar-mi-página

; ¿cómo puedo hacer que esta ruta valga tanto para /sección/página.html como para /sección/subs1/página.html? ← creo que algo monté para esto
;"
;<script type=\"text/javascript\" src=\"../menu/menubody.js\"></script>
;"
; Contenedores que serán rellenados por JS:
"
<div id=\"aviso-ie\"></div>
<div id=\"menu\"></div>
"
; No hace falta pues está dentro del contenido ya <h1 class=\"title\">%t</h1>

)

(postámbulo-al-publicar-mi-página
"prueba
<p>
{{{date(%e.m%m.%Y)}}} (desde 2009). Daniel Clemente Laboreo ([[http://www.danielclemente.com/][web]], [[n142857@QUITA_ESTO.gmail.com][correo]]).
</p>

")

(estilo-al-publicar-mi-página ; ← en org v8 ya no lo uso pues lo defino en .org con #+HTML_HEAD_EXTRA
; ¡atención! El código ha de ser XHTML, no sólo HTML
"
<link rel=\"stylesheet\" type=\"text/css\" href=\"basic.css\"></link>
<link rel=\"stylesheet\" type=\"text/css\" href=\"../menu/menu.css\"></link>
<script type=\"text/javascript\" src=\"../pagina/jquery-min.js\"></script>
<script type=\"text/javascript\" src=\"../pagina/jquery.inc.js\"></script>
<script type=\"text/javascript\" src=\"../menu/menu-v2.js\"></script>
<script type=\"text/javascript\" src=\"../pagina/popup_ie.js\"></script>

"
;; no hace falta definir esto pues ya funciona si se toca la cabecera de un .org
;                <script type=\"text/javascript\" src=\"../pagina/org-info.js\"></script>
;                <script type=\"text/javascript\">
;                 /* <![CDATA[ */
;                    org_html_manager.setup ();
;                 /* ]]> */
;                </script>
;
)
)



;;; otra configuración ya para mi web en serio y dentro de un cdv; tengo que generalizarla para cualquier sección
(ignore '(
(add-to-list 'org-publish-project-alist 
				  `("hacer (sólo directorio „hacer“ de rama „hacer“)"
				   :base-directory "~/repoweb/hacer/hacer/"
;local:;
				   :publishing-directory "~/repoweb/hacer/hacer/"
;				   :publishing-directory "~/proj/disk/html"
;remoto:;
;				   :publishing-directory "/dc@glass.dreamhost.com:/home/dc/danielclemente.com/disk/"
;				   :exclude "opciones.org" ; es incluido por otros
				   :exclude "\\(opciones\\.org\\|secciones\\.org\\)" ; son incluidos por otros
;				   :preparation-function dislines-disk
;				   :section-numbers nil
;				   :table-of-contents nil
				   :html-preamble ,preámbulo-al-publicar-mi-página
				   :html-postamble nil
;				   :html-postamble ,postámbulo-al-publicar-mi-página

;				   :auto-preamble nil
				   :auto-postamble nil

; pruebas que no resultan como quiero:
;				   :auto-postamble t
;				   :author "Daniel Clemente Laboreo"
;				   :email "web ([[http://www.danielclemente.com/]]), <b>negrita</b>"

				   ; en org v8 ya no uso :style pues lo defino en .org con #+HTML_HEAD_EXTRA
				   ; :style ,estilo-al-publicar-mi-página

;                                   :auto-index t
				   )
)
))


;;; intento generalizar la configuración anterior
(ignore '(
(add-to-list 'org-publish-project-alist 


;				  ("webdcl"
;				   :base-directory "~/repoweb/"
; … pero no mucho. En principio para una sola rama
				  `("webdcl,rama:hacer (entera)"
				   :base-directory "~/repoweb/hacer/"

				   :recursive t
;local:;
; no quiero decirle el directorio de destino
;				   :publishing-directory "~/repoweb/hacer/hacer/"

; parece que no me lo permite; he de poner algo
; Yo quiero que use el mismo directorio de origen del fichero
				   :publishing-directory "~/repoweb/hacer/"
; creo que está metiendo todo aquí a saco en vez de crear los subdirectorios que tocan; corregir
; ¡¡¡!!!: creo que tiene que ser igual que base-directory para ir bien (publicando en el mismo sitio)


;				   :publishing-directory "~/proj/disk/html"
;remoto:;
;				   :publishing-directory "/dc@glass.dreamhost.com:/home/dc/danielclemente.com/disk/"

; esto era una prueba y hace que falle todo; lo quito pues parece que include no permite expregus
;				   :exclude ".*"
;				   :include ("/repoweb/hacer/.*")

				   ;:exclude "opciones.org" ; es incluido por otros
				   :exclude "\\(opciones\\.org\\|secciones\\.org\\)" ; son incluidos por otros
;				   :preparation-function dislines-disk
;				   :section-numbers nil
;				   :table-of-contents nil

; esto sale después del <body>
				   :html-preamble ,preámbulo-al-publicar-mi-página
;				   :html-postamble ,postámbulo-al-publicar-mi-página
				   :html-postamble nil


;				   :auto-preamble nil
				   :auto-postamble nil
				   :style ,estilo-al-publicar-mi-página


;                                   :auto-index t
				   )


)
))


;;; configuración preparada para exportar en rama ofinial
; hale, otra configuración liosa más. Es la final; la ejecutaré sólo la última vez, la definitiva.
(add-to-list 'org-publish-project-alist 
				  `("exportar mi hacer de repoweb"
				   :base-directory "~/repoweb/hacer/"
				   :publishing-directory "~/repoweb/hacer/"
				   ;:publishing-function org-publish-org-to-html ; por lo visto es necesario decir publishing-function
				   :publishing-function org-html-publish-to-html ; en org v8 se llama así (ya no existe org-publish-org-to-html)
				   :exclude "opciones.org" ; secciones.org también tocará
				   :html-preamble ,preámbulo-al-publicar-mi-página
				   :html-postamble nil
				   :auto-postamble nil
				   :style ,estilo-al-publicar-mi-página
				   )
)



)
; para probar: (setq org-publish-project-alist nil)
; y luego evaluar el „)“ en la línea de arriba