Browse Source

Correct mistakes with the licence

Leo 9 years ago
parent
commit
fc6da6e384
3 changed files with 3 additions and 3 deletions
  1. 1 1
      src/command_def.ml
  2. 1 1
      src/licencing.ml
  3. 1 1
      src/tmp_file.ml

+ 1 - 1
src/command_def.ml

@@ -200,7 +200,7 @@ let licence =
       empty
        +> shared_params
        +> flag "-header" no_arg
-        ~doc:" Display the text of the licence"
+        ~doc:" Display the header of the licence"
     )
     (fun _ header () ->
       let cecill = not(header) in (* When cecill is false, it displays the header *)

+ 1 - 1
src/licencing.ml

@@ -41,7 +41,7 @@ open Core.Std;;
 (* French version *)
 let fr_header =
   "\
-  Copyright © Joly Clément, 2015 \
+  Copyright © Joly Clément, 2014-2015 \
 
  leowzukw@vmail.me \
 

+ 1 - 1
src/tmp_file.ml

@@ -1,5 +1,5 @@
 (******************************************************************************)
-(* Copyright © Joly Clément, 2014                                             *)
+(* Copyright © Joly Clément, 2014-2015                                        *)
 (*                                                                            *)
 (*  leowzukw@vmail.me                                                         *)
 (*                                                                            *)