| 685 |
685 |
| 686 -- Unescape characters that have been encoded. |
686 -- Unescape characters that have been encoded. |
| 687 local function unescape_special_chars(t) |
687 local function unescape_special_chars(t) |
| 688 local tin = t |
688 local tin = t |
| 689 for k,v in pairs(escape_table) do |
689 for k,v in pairs(escape_table) do |
| 690 k = k:gsub("%%", "%%%%") |
690 kx = k:gsub("%%", "%%%%") |
| 691 t = t:gsub(v,k) |
691 t = t:gsub(v,kx) |
| 692 end |
692 end |
| 693 if t ~= tin then t = unescape_special_chars(t) end |
693 if t ~= tin then t = unescape_special_chars(t) end |
| 694 return t |
694 return t |
| 695 end |
695 end |
| 696 |
696 |