mirror of
https://github.com/rkd77/elinks.git
synced 2024-11-04 08:17:17 -05:00
28 lines
698 B
Lua
28 lines
698 B
Lua
|
-- Source-code highlighting hook
|
||
|
|
-- $Id: highlight.lua,v 1.5 2005/03/25 19:02:48 miciah Exp $
|
||
|
|
|
||
|
|
highlight_file_types = {
|
||
|
|
patch = "%.patch$",
|
||
|
|
python = "%.py$",
|
||
|
|
perl = "%.pl$",
|
||
|
|
awk = "%.awk$",
|
||
|
|
c = "%.[ch]$",
|
||
|
|
sh = "%.sh$",
|
||
|
|
}
|
||
|
|
|
||
|
|
function highlight (url, html)
|
||
|
|
for language,pattern in pairs(highlight_file_types) do
|
||
|
|
if string.find (url, pattern) then
|
||
|
|
local tmp = tmpname ()
|
||
|
|
writeto (tmp) write (html) writeto()
|
||
|
|
html = pipe_read ("(code2html -l "..language.." "..tmp.." - ) 2>/dev/null")
|
||
|
|
os.remove(tmp)
|
||
|
|
return html,nil
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
return nil,nil
|
||
|
|
end
|
||
|
|
|
||
|
|
table.insert(pre_format_html_hooks, highlight)
|