From c4d376b33ef504be226d8090ee59c64bbb963696 Mon Sep 17 00:00:00 2001
From: mitchell <70453897+667e-11@users.noreply.github.com>
Date: Wed, 7 Mar 2012 12:47:38 -0500
Subject: Removed `scripts/update_doc` in favor of using `src/Makefile`.
---
doc/gen_manual.lua | 66 ++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 file changed, 66 insertions(+)
create mode 100644 doc/gen_manual.lua
(limited to 'doc/gen_manual.lua')
diff --git a/doc/gen_manual.lua b/doc/gen_manual.lua
new file mode 100644
index 00000000..5fa06bfe
--- /dev/null
+++ b/doc/gen_manual.lua
@@ -0,0 +1,66 @@
+-- Copyright 2007-2012 Mitchell mitchell.att.foicica.com. See LICENSE.
+
+local HTML = [[
+
+
+
+ %(title)
+
+
+
+
+
+
+
Manual
+ %(nav)
+
+
+
Contents
+ %(toc)
+
+
+ %(main)
+
+
+
+
+]]
+
+-- Get manual pages.
+local pages = {}
+local lfs = require 'lfs'
+for file in lfs.dir('manual/') do
+ if file:find('^%d+_.-%.md$') then pages[#pages + 1] = file end
+end
+table.sort(pages)
+pages[#pages + 1] = '../../README.md'
+pages[#pages + 1] = '../../CHANGELOG.md'
+pages[#pages + 1] = '../../THANKS.md'
+
+-- Create the navigation list.
+local navfile = 'manual/.nav.md'
+local f = io.open(navfile, 'wb')
+for _, page in ipairs(pages) do
+ local name = page:match('^%A+(.-)%.md$'):gsub('(%l)(%u)', '%1 %2')
+ if page:find('^%.%./') then page = page:match('^%A+(.+)$') end
+ f:write('* [', name, '](', page:gsub('%.md$', '.html'), ')\n')
+end
+f:close()
+local p = io.popen('markdown "'..navfile..'"')
+local nav = p:read('*all')
+p:close()
+
+-- Write HTML.
+for _, page in ipairs(pages) do
+ local name = page:match('^%A+(.-)%.md$'):gsub('(%l)(%u)', '%1 %2')
+ local p = io.popen('markdown -f toc -T "manual/'..page..'"')
+ local toc, main = p:read('*all'):match('^(.-\n\n)(.+)$')
+ p:close()
+ if page:find('^%.%./') then page = page:match('^%A+(.+)$') end
+ f = io.open('manual/'..page:gsub('%.md$', '.html'), 'wb')
+ local html = HTML:gsub('%%%(([^)]+)%)', {
+ title = name..' - Textadept Manual', nav = nav, toc = toc, main = main
+ })
+ f:write(html)
+ f:close()
+end
--
cgit v1.2.3