From 2e29673fa970b814c97d5838963de49c2a65424b Mon Sep 17 00:00:00 2001 From: Sébastien Dailly Date: Mon, 7 Feb 2022 13:43:24 +0100 Subject: Rename application functions --- css/merger.ml | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'css') diff --git a/css/merger.ml b/css/merger.ml index 2a681be..47fa906 100755 --- a/css/merger.ml +++ b/css/merger.ml @@ -47,7 +47,7 @@ let build_result module AddFile = struct type t = file - let update file state = + let process file state = let _ = state.files##push file in let elements = state.files##.length and result_css = build_result state.files in @@ -58,7 +58,7 @@ module DelFile = struct type t = File.t - let update file state = + let process file state = let files = state.files##filter (Js.wrap_callback @@ (fun elt _ _ -> Js.bool (elt.file != file))) in let elements = files##.length -- cgit v1.2.3