diff options
| -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 |