Fix global vars in lua scripts

inst/lua/blocks-to-inlines.lua

@@ -1,12 +1,13 @@
+local sep = {}
+
 function Meta(meta)
-  sep = meta.sep_blocks and (
-      meta.sep_blocks.t and meta.sep_blocks or {pandoc.Str(meta.sep_blocks)}
-    ) or {pandoc.LineBreak(), pandoc.LineBreak()}
+	sep = meta.sep_blocks and (meta.sep_blocks.t and meta.sep_blocks or { pandoc.Str(meta.sep_blocks) })
+		or { pandoc.LineBreak(), pandoc.LineBreak() }
 end
 
 function Div(div)
-  div.content = {pandoc.Para(pandoc.utils.blocks_to_inlines(div.content, sep))}
-  return div
+	div.content = { pandoc.Para(pandoc.utils.blocks_to_inlines(div.content, sep)) }
+	return div
 end
 
-return {{Meta = Meta}, {Div = Div}}
+return { { Meta = Meta }, { Div = Div } }

inst/lua/cite.lua

@@ -1,12 +1,12 @@
-cite = {}
+local cite = {}
 
 function Cite(elem)
-  table.insert(cite, elem)
-  table.insert(cite, pandoc.Space())
+	table.insert(cite, elem)
+	table.insert(cite, pandoc.Space())
 end
 
 function Pandoc(doc)
-  table.remove(cite)
-  doc.blocks = {pandoc.Para(cite)}
-  return doc
+	table.remove(cite)
+	doc.blocks = { pandoc.Para(cite) }
+	return doc
 end

inst/lua/inline-code.lua

@@ -1,11 +1,11 @@
 function Code(elem)
-  if elem.attributes['font.family'] == nil then
-    elem.attributes['font.family'] = 'monospace'
-  end
-  if elem.attributes['shading.color'] == nil then
-    elem.attributes['shading.color'] = '#f8f8f8'
-  end
-  local span = pandoc.Span(elem.text)
-  span.attr = elem.attr
-  return span
+	if elem.attributes["font.family"] == nil then
+		elem.attributes["font.family"] = "monospace"
+	end
+	if elem.attributes["shading.color"] == nil then
+		elem.attributes["shading.color"] = "#f8f8f8"
+	end
+	local span = pandoc.Span(elem.text)
+	span.attr = elem.attr
+	return span
 end

inst/lua/math.lua

@@ -13,49 +13,45 @@ THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLI
 
 https://github.com/atusy/lua-filters/blob/master/lua/math.lua
 ]]
-is_pandoc_2_10 = (PANDOC_VERSION[1] >= 2) and (PANDOC_VERSION[2] >= 10)
+local is_pandoc_2_10 = (PANDOC_VERSION[1] >= 2) and (PANDOC_VERSION[2] >= 10)
+
+local L = {}
 
 if pandoc.system.os ~= "mingw32" then
-  function math2html(text)
-    return pandoc.pipe(cmd, {"-t", "html", "-f", "markdown"}, text)
-  end
+	function L.math2html(cmd, text)
+		return pandoc.pipe(cmd, { "-t", "html", "-f", "markdown" }, text)
+	end
 else
-  if is_pandoc_2_10 then
-    with_temporary_directory = pandoc.system.with_temporary_directory
-  else
-    with_temporary_directory = function(ignored, callback)
-      return callback(temporary_directory)
-    end
-  end
-
-  math2html = function(text)
-    local function callback(directory)
-      local path = directory .. "\\math-rendered-by-lua-filter.html"
-      pandoc.pipe(cmd, {"-t", "html", "-f", "markdown", "-o", path}, text)
-      return io.open(path):read("a")
-    end
-
-    return with_temporary_directory("write_html_math", callback)
-  end
+	if is_pandoc_2_10 then
+		L.with_temporary_directory = pandoc.system.with_temporary_directory
+	else
+		function L.with_temporary_directory(_, callback)
+			return callback(L.temporary_directory)
+		end
+	end
+
+	function L.math2html(cmd, text)
+		local function callback(directory)
+			local path = directory .. "\\math-rendered-by-lua-filter.html"
+			pandoc.pipe(cmd, { "-t", "html", "-f", "markdown", "-o", path }, text)
+			return io.open(path):read("a")
+		end
+
+		return L.with_temporary_directory("write_html_math", callback)
+	end
 end
 
 function Meta(elem)
-  cmd = elem["pandoc-path"] and (
-    pandoc.utils.stringify(elem["pandoc-path"])
-  ) or "pandoc"
+	L.cmd = elem["pandoc-path"] and (pandoc.utils.stringify(elem["pandoc-path"])) or "pandoc"
 
-  temporary_directory = elem["temporary-directory"] and (
-    pandoc.utils.stringify(elem["temporary-directory"])
-  ) or "."
+	L.temporary_directory = elem["temporary-directory"] and (pandoc.utils.stringify(elem["temporary-directory"])) or "."
 end
 
 function Math(elem)
-  return pandoc.read(
-    math2html("$" .. elem.text:gsub("[\n\r]", "") .. "$"), "html"
-  ).blocks[1].content[1].content
+	return pandoc.read(L.math2html(L.cmd, "$" .. elem.text:gsub("[\n\r]", "") .. "$"), "html").blocks[1].content[1].content
 end
 
 return {
-  {Meta = Meta},
-  {Math = Math}
+	{ Meta = Meta },
+	{ Math = Math },
 }

inst/lua/smart.lua

@@ -15,13 +15,13 @@ https://github.com/atusy/lua-filters/blob/master/lua/smart.lua
 ]]
 
 local quotes = {
-  SingleQuote = {pandoc.Str("‘"), pandoc.Str("’")},
-  DoubleQuote = {pandoc.Str("“"), pandoc.Str("”")}
+	SingleQuote = { pandoc.Str("‘"), pandoc.Str("’") },
+	DoubleQuote = { pandoc.Str("“"), pandoc.Str("”") },
 }
 
 function Quoted(elem)
-  local q = quotes[elem.quotetype]
-  table.insert(elem.content, 1, q[1])
-  table.insert(elem.content, q[2])
-  return elem.content
+	local q = quotes[elem.quotetype]
+	table.insert(elem.content, 1, q[1])
+	table.insert(elem.content, q[2])
+	return elem.content
 end