Mercurial > prosody-modules
view mod_latex/mod_latex.lua @ 4976:75b6e5df65f9
various: Improve error reporting if missing file server module on 0.12
If there is some error loading net.http.files then it would be swallowed
by the pcall and then it would proceed to trying mod_http_files, which
might cause unexpected behavior on 0.12
Ref #1765
author | Kim Alvefur <zash@zash.se> |
---|---|
date | Mon, 18 Jul 2022 22:47:54 +0200 |
parents | df8da7e4c2bf |
children |
line wrap: on
line source
local st = require "stanza"; local urlencode = require "net.http".urlencode; local xmlns_xhtmlim = "http://jabber.org/protocol/xhtml-im"; local xmlns_xhtml = "http://www.w3.org/1999/xhtml"; local function replace_latex(data) local origin, stanza = data.origin, data.stanza; local body = stanza:get_child_text("body"); if not body or not body:match("%$%$") then return; end module:log("debug", "Replacing latex..."); local html = st.stanza("html", { xmlns = xmlns_xhtmlim }) :tag("body", { xmlns = xmlns_xhtml }); local in_latex, last_char; for snippet, up_to in body:gmatch("(.-)%$%$()") do last_char = up_to; if in_latex then -- Render latex and add image, next snippet is text in_latex = nil; html:tag("img", { src = "http://www.mathtran.org/cgi-bin/mathtran?D=2;tex="..urlencode(snippet), alt = snippet }):up(); else -- Add text to HTML, next snippet is latex in_latex = true; html:tag("span"):text(snippet):up(); end end if last_char < #body then html:tag("span"):text(body:sub(last_char, #body)):up(); end for n, tag in ipairs(stanza.tags) do module:log("debug", "Tag: %s|%s", tag.attr.xmlns or "", tag.name or ""); if tag.name == "html" and tag.attr.xmlns == xmlns_xhtmlim then stanza.tags[n] = html; for n, child in ipairs(stanza) do if child == tag then stanza[n] = html; end end return; end end stanza[#stanza+1] = html; stanza.tags[#stanza.tags+1] = html; end module:hook("message/bare", replace_latex, 30); module:hook("message/full", replace_latex, 30);