scansion/pretty.lua

changeset 178
e547ddf8b64d
parent 174
662bd8c5ae28
equal deleted inserted replaced
177:3c19b67a1f0f 178:e547ddf8b64d
1 require "verse" 1 require "verse"
2 local xml = require "scansion.xml"; 2 local xml = require "scansion.xml";
3 local s_format, s_gsub = string.format, string.gsub; 3 local s_format, s_gsub = string.format, string.gsub;
4 4
5 local unsorted_pairs = pairs; 5 local unsorted_pairs = pairs;
6 local sorted_pairs = require "util.iterators".sorted_pairs; 6 local sorted_pairs = require "scansion.helpers".sorted_pairs;
7 7
8 local escape_table = { ["'"] = "&apos;", ["\""] = "&quot;", ["<"] = "&lt;", [">"] = "&gt;", ["&"] = "&amp;" }; 8 local escape_table = { ["'"] = "&apos;", ["\""] = "&quot;", ["<"] = "&lt;", [">"] = "&gt;", ["&"] = "&amp;" };
9 local function xml_escape(str) return (s_gsub(str, "['&<>\"]", escape_table)); end 9 local function xml_escape(str) return (s_gsub(str, "['&<>\"]", escape_table)); end
10 10
11 -- Dummy functions compatible with util.termcolours, 11 -- Dummy functions compatible with util.termcolours,

mercurial