@@ -38,7 +38,6 @@ DokuWiki: <https://www.dokuwiki.org/dokuwiki>
3838 [ ] Don't generate <div>
3939 [ ] Implement conversion of tables
4040 [ ] Implement comments
41− [ ] Implement footnotes
4241 [ ] Work through the Dokuwiki spec, and check I've not missed anything out
4342 [ ] Test the output in Dokuwiki - and compare against the display of another format, e.g. HTML
4443 [ ] Remove dud/duplicate code
@@ -77,7 +76,8 @@ pandocToDokuWiki opts (Pandoc meta blocks) = do
7776 body <- blockListToDokuWiki opts blocks
7877 notesExist <- get >>= return . stNotes
7978 let notes = if notesExist
80− then "\n<references />"
79+ then "" -- TODO Was "\n<references />" Check whether I can really remove this:
80+ -- if it is definitely to do with footnotes, can remove this whole bit
8181 else ""
8282 let main = body ++ notes
8383 let context = defField "body" main
@@ -438,5 +438,5 @@ inlineToDokuWiki opts (Image alt (source, tit)) = do
438438inlineToDokuWiki opts (Note contents) = do
439439 contents' <- blockListToDokuWiki opts contents
440440 modify (\s -> s { stNotes = True })
441− return $ "<ref>" ++ contents' ++ "</ref>"
441+ return $ "((" ++ contents' ++ "))"
442442 -- note - may not work for notes with multiple blocks