From c81815e1a5ccc155ac08ee5ff028369280bf5e68 Mon Sep 17 00:00:00 2001 From: Swrup Date: Thu, 27 Jan 2022 10:45:34 +0100 Subject: [PATCH] fix duplicate citation --- src/babillard.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/babillard.ml b/src/babillard.ml index 2209b38..21ad6f5 100644 --- a/src/babillard.ml +++ b/src/babillard.ml @@ -355,7 +355,7 @@ let parse_comment comment = lines in (* remove duplicate cited_id *) - let cited_posts = List.sort_uniq (fun _ _ -> 1) cited_posts in + let cited_posts = List.sort_uniq String.compare cited_posts in (comment, cited_posts) let view_post ?is_thread_preview post_id =