fix build with OCaml 4.02 (closes #6)

ygrek · Sep 17, 2014 · c91a788 · c91a788 · gontthias · Dec 13, 2017
1 parent fbc2cfe
commit c91a788
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/utils/net/terminal.ml b/src/utils/net/terminal.ml
@@ -185,7 +185,7 @@ module Output = struct
   let canal = List.assoc chan !chanmap in
   etat.chan <- Some (chan, canal);
   info (sprintf "connecte au canal '%s'" chan);
-  (* {| canal ALL } *)
+  (* { | canal ALL } *)
        with Not_found -> (* pas encore de recepteur pour ce canal *)
   try (* on en cree un *)
     let serveur = nsrecord.get_loc chan in