blob: cadcbfcd4784f00a2a947e45acfcfe066ffddd48 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
|
local mkutils = require "mkutils"
local zip = require "zip"
local function get_template_filename(settings)
-- either get the template odt filename from tex4ht.sty options (make4ht filename.tex "odttemplate=test.odt")
local tex4ht_settings = settings.tex4ht_sty_par
local templatefile = tex4ht_settings:match("odttemplate=([^%,]+)")
if templatefile then return templatefile end
-- read the template odt filename from settings
local filtersettings = get_filter_settings "odttemplate"
return settings.template or filtersettings.template
end
return function(content, settings)
-- use settings added from the Make:match, or default settings saved in Make object
local templatefile = get_template_filename(settings)
-- don't do anything if the template file doesn't exist
if not templatefile or not mkutils.file_exists(templatefile) then return content end
local odtfile = zip.open(templatefile)
if odtfile then
local stylesfile = odtfile:open("styles.xml")
-- just break if the styles cannot be found
if not stylesfile then return content end
local styles = stylesfile:read("*all")
return styles
end
-- just return content in the case of problems
return content
end
|