From b8b1b6704069497d9ccbbe35db3c5a17b2f9bc4c Mon Sep 17 00:00:00 2001 From: Alban Gruin Date: Sat, 5 Feb 2022 14:51:58 +0100 Subject: ics: make Ics.t public To simplify code down the line, this makes Ics.t public so everyone can apply standard list processing functions onto it. Signed-off-by: Alban Gruin --- src/ics.ml | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'src/ics.ml') diff --git a/src/ics.ml b/src/ics.ml index 0f8c7d6..5afff39 100644 --- a/src/ics.ml +++ b/src/ics.ml @@ -1,5 +1,5 @@ (* - * Copyright (C) 2020, 2021 Alban Gruin + * Copyright (C) 2020 -- 2022 Alban Gruin * * ucs is free software: you can redistribute it and/or modify * it under the terms of the GNU Affero General Public License as published @@ -77,7 +77,6 @@ end type t = Event.t list -let make events = events let filter_groups groups = List.filter (Event.has_groups groups) -- cgit v1.2.1