fey.naomi/fennel-ls
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

slightly modify the lua-manual tool

Browse Source
This commit is contained in:
XeroOl 2024-09-03 12:18:19 -05:00
parent 5e8b31ea47
commit ffe428e0f5
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
tools/get-docs/lua-manual.fnl
View File

@ -52,6 +52,7 @@
(: :gsub "\"<code>(.-)</code>\"" "`\"%1\"`") (: :gsub "\"<code>(.-)</code>\"" "`\"%1\"`")
(: :gsub "\'<code>(.-)</code>\'" "`\"%1\"`") (: :gsub "\'<code>(.-)</code>\'" "`\"%1\"`")
(: :gsub "<code>(.-)</code>" "`%1`") (: :gsub "<code>(.-)</code>" "`%1`")
;; supremum to unicode
(: :gsub "<sup>x</sup>" "ˣ") (: :gsub "<sup>x</sup>" "ˣ")
(: :gsub "<sup>e</sup>" "ᵉ") (: :gsub "<sup>e</sup>" "ᵉ")
(: :gsub "<sup>y</sup>" "ʸ") (: :gsub "<sup>y</sup>" "ʸ")
@ -75,7 +76,7 @@
(: :gsub "</?ul>" "")) (: :gsub "</?ul>" ""))
;; check to ensure that all the tags have been defeated ;; check to ensure that all the tags have been defeated
tag (str:match "<[^>]+>[^>]+>")] tag (str:match "<[^>]+>[^>]+>")]
(when tag (error (.. tag "\n" str))) (when tag (error (.. "unhandled tag:" tag "\n" str)))
(-> str (-> str
;; trim whitespace ;; trim whitespace
(: :match "^%s*(.-)%s*$") (: :match "^%s*(.-)%s*$")