crc/retroforth
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

docs: add cover to epub (closes #47)

Browse source 
FossilOrigin-Name: 7e6160c8257973f3df6505babf96d951e6ea563a41ee84e6375f0ea26750ee37
This commit is contained in:
crc 2021-02-02 14:18:51 +00:00
parent 9c93e766fc
commit 42dbd43f16
2 changed files with 3 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

BIN
doc/Book-Cover.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 138 KiB

3
tools/generate-epub.retro
View file

@ -118,6 +118,7 @@ that are used in the book.
'____<dc:creator_opf:role="aut">Charles_Childers</dc:creator>
'__</metadata>
'__<manifest>
'____<item_id="cover"_href="Book-Cover.png"_media-type="image/png"_properties="cover-image"/>
'____<item_id="ncx"_href="TOC.ncx"_media-type="application/x-dtbncx+xml"/>
} [ file:s:put file:nl ] a:for-each
@ -151,6 +152,7 @@ drop
'Relocate_files s:put nl
'epub unix:chdir
'cp_-r_../chapters_. unix:system
'cp_../doc/Book-Cover.png_. unix:system
~~~
# Zip Everything
@ -162,6 +164,7 @@ drop
'zip_-Xr9Dqv_../book.epub_TOC.ncx unix:system
'zip_-Xr9Dqv_../book.epub_META-INF unix:system
'zip_-Xr9Dqv_../book.epub_chapters unix:system
'zip_-Xr9Dqv_../book.epub_Book-Cover.png unix:system
'.. unix:chdir
~~~