Parcourir la source

Code clean-up

 + Line longer than 80 characters.
Leo il y a 9 ans
Parent
commit
0ed5b11685
1 fichiers modifiés avec 2 ajouts et 1 suppressions
  1. 2 1
      src/command_def.ml

+ 2 - 1
src/command_def.ml

@@ -229,7 +229,8 @@ let licence =
            ~doc:" Display the header of the licence"
     )
     (fun _ header () ->
-       let cecill = not(header) in (* When cecill is false, it displays the header *)
+       (* When cecill is false, it displays the header *)
+       let cecill = not(header) in
        Licencing.print ~cecill
     )
 ;;