diff options
author | George Punter <gsp14@ic.ac.uk> | 2018-03-22 20:12:05 +0000 |
---|---|---|
committer | George Punter <gsp14@ic.ac.uk> | 2018-03-22 20:12:05 +0000 |
commit | 1d8955651bdcbe735aad56980629edd959b153e8 (patch) | |
tree | 652c1022ea8347460e214f13a769e4e582afbb2d /FMark | |
parent | 09cdeb8f0e030d0ac7e8ce0900d9111dee917dc9 (diff) | |
download | FMark-1d8955651bdcbe735aad56980629edd959b153e8.tar.gz FMark-1d8955651bdcbe735aad56980629edd959b153e8.zip |
changing reference in TOCite.fs to InlineFootnote
Diffstat (limited to 'FMark')
-rw-r--r-- | FMark/src/Common/TOCite/TOCite.fs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/FMark/src/Common/TOCite/TOCite.fs b/FMark/src/Common/TOCite/TOCite.fs index 119bd4c..88d6c8b 100644 --- a/FMark/src/Common/TOCite/TOCite.fs +++ b/FMark/src/Common/TOCite/TOCite.fs @@ -10,7 +10,7 @@ let mountedInLineParser tokLst = match tLst with | FOOTNOTE i::tl -> let s = string i - parseInLineElements toParse :: [Reference (Literal s, "footnote-"+s)] + parseInLineElements toParse :: [InlineFootnote (Literal s, "footnote-"+s)] :: mountedInLineParser' [] tl | CITATION _::tl -> mountedInLineParser' toParse tl | a::tl -> mountedInLineParser' (a::toParse) tl |