From 6f13402c0794a520b557c471055118026bf419fa Mon Sep 17 00:00:00 2001 From: Ekaitz Zarraga Date: Fri, 29 May 2020 16:11:39 +0200 Subject: add Ebook --- Makefile.scm | 20 +++++++++++++++++++- 1 file changed, 19 insertions(+), 1 deletion(-) (limited to 'Makefile.scm') diff --git a/Makefile.scm b/Makefile.scm index b593a3c..cc36c8b 100644 --- a/Makefile.scm +++ b/Makefile.scm @@ -50,7 +50,6 @@ `("./utils/yaml2json.py" ,file) "Error parsing Metadata file"))) -;TODO (define (pandoc-web-simple lang output input) (let ((outpath (make-path output "WebSimple")) (files (directory-sources lang input)) @@ -119,6 +118,24 @@ `("--metadata-file" ,metafile)) "Error in book creation"))) +(define (pandoc-epub lang output input) + (let ((outpath (make-path output "Epub")) + (files (directory-sources lang input)) + (metafile (directory-meta lang input))) + (create-directory* outpath) + (process->string-or-fail + (append + `("pandoc" + "-o" ,(make-path outpath (string-append lang ".epub")) + "--standalone" + "--data-dir=." + ,(string-append "--resource-path=" input) + "--css=./templates/ebook/epub.css" + "--template=book.epub" + "--lua-filter=appendixes.lua") + files + `("--metadata-file" ,metafile)) + "Error in book creation"))) ;; RUN THIS LIKE: ;; chibi-scheme Makefile.scm src/BOOK_FOLDER ;; @@ -133,6 +150,7 @@ (pandoc-web "es" output input) (pandoc-web-simple "es" output input) (pandoc-book "es" output input) +(pandoc-epub "es" output input) ;(display (process->string-or-fail '("./utils/yaml2json.py" "src/Programming_in_Python/es/Metadata.yaml") "")) ;(display (cdr (assoc 'title (read-meta "src/Programming_in_Python/es/Metadata.yaml")))) -- cgit v1.2.3