From bb060bb4615088ddb56e9e28e388db2b8216d1cb Mon Sep 17 00:00:00 2001
From: Qieerb <qieerbushe7@gmail.com>
Date: Fri, 23 Mar 2018 13:11:06 +0000
Subject: testing + fixes

---
 FMark/src/Common/TOCite/RefParse.fs | 11 -----------
 1 file changed, 11 deletions(-)

(limited to 'FMark')

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
-- 
cgit