aboutsummaryrefslogtreecommitdiffstats
path: root/FMark/src/Common/TOCite/RefParse.fs
diff options
context:
space:
mode:
Diffstat (limited to 'FMark/src/Common/TOCite/RefParse.fs')
-rw-r--r--FMark/src/Common/TOCite/RefParse.fs11
1 files changed, 0 insertions, 11 deletions
diff --git a/FMark/src/Common/TOCite/RefParse.fs b/FMark/src/Common/TOCite/RefParse.fs
index e2ffc43..24dbd93 100644
--- a/FMark/src/Common/TOCite/RefParse.fs
+++ b/FMark/src/Common/TOCite/RefParse.fs
@@ -218,14 +218,3 @@ let refParse style tocLst =
match tocLst with
| PickoutParagraph (tk,rtok) -> refParser style tk |> fun (a,b) -> a,b,rtok
| _ -> refParser style tocLst |> fun (a,b) -> a,b,[]
-
-
-
-(* let ind = tocLst |> List.tryFindIndex (fun x -> x = ENDLINE)
- match ind with
- | Some i ->
- let (h,t) = List.splitAt i tocLst
- refParser style h |> fun (a,b) -> a,b,t.Tail
- | None ->
- refParser style tocLst |> fun (a,b) -> a,b,[]
- *) \ No newline at end of file