From 2e29673fa970b814c97d5838963de49c2a65424b Mon Sep 17 00:00:00 2001
From: Sébastien Dailly <sebastien@dailly.me>
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/merger.ml')

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