Add a top link to headings.

1 files changed, 5 insertions, 5 deletions

diff --git a/notYetAnotherWiki.lua b/notYetAnotherWiki.lua
index 7d79304..974fde6 100755
--- a/notYetAnotherWiki.lua
+++ b/notYetAnotherWiki.lua
@@ -712,7 +712,7 @@ end
 
 function Writer.header(s, level)
     local text = Lunamark.util.rope_to_string(s)
-    return '<h' .. level .. ' id="' .. RE.gsub(text, '{[ ]}', '_') .. '">' .. text .. '</h' .. level .. '>'
+    return '<h' .. level .. ' id="' .. RE.gsub(text, '{[ ]}', '_') .. '">' .. text .. ' <a style="font-size: 0.42em;" href="#top">👆</a></h' .. level .. '>'
 end
 local OgWriterLink = Writer.link        -- So we can call the original from within mine, we are just changing the URL.
 function Writer.link(lab, url, tit)
@@ -780,14 +780,14 @@ for name, file in pairs(Files) do
             if bit == f then
                                         metadata.menu = metadata.menu .. '<p>' .. title .. '</p>'
                 for j, g in ipairs(file.headers) do
+                        local beg, en = RE.find(g, [['{']])
+                        if nil ~= beg then
+                            g = string.sub(g, 1, beg - 2)
+                        end
                     local h = string.sub(RE.gsub(g, '{[#]}', ''), 2)
                     local l = string.len(g) - string.len(h)
                     g = h
                     h = RE.gsub(h, '{[ ]}', '&nbsp;')
-                        local beg, en = RE.find(h, [['{']])
-                        if nil ~= beg then
-                            g = string.sub(h, 1, beg - 7)
-                        end
 -- FIXME - if it's a linky, strip off the URL part.  The Wiki audit has such things.
                                         metadata.menu = metadata.menu .. '<p>' .. string.rep('&nbsp;', l) .. '<a style="font-size: 0.80em;" href="#' .. RE.gsub(g, '{[ ]}', '_') .. '">' ..  h .. '</a></p>'
                 end