Clean up code

 - Improve message
 - Remove useless spaces

src/const.ml

@@ -41,7 +41,7 @@ open Core.Std;;
 (* Get current home *)
 let home = match (Sys.getenv "HOME") with
   | Some x -> x
-  | None -> failwith "Wrong value for home"
+  | None -> failwith "Wrong value for home\n"
 ;;
 
 (* Some settings variales *)

src/exec_cmd.ml

@@ -43,7 +43,7 @@ let num_cmd_to_cmd ~cmd_list number =
   then
       begin
           (* TODO Make this printing configurable *)
-          printf "Out of range. All has been launched!";
+          printf "Out of range. All has been launched!\n";
           ""
       end
   else
@@ -60,7 +60,7 @@ let num_cmd_to_cmd ~cmd_list number =
 let what_next ~cmd_list =
   let tmp_file = Tmp_file.read () in
   num_cmd_to_cmd ~cmd_list:cmd_list tmp_file.number
-  ;;
+;;
 
 (* Display an error message if command can't run
  * if 0 status, do nothing

src/tmp_file.ml

@@ -123,5 +123,5 @@ let reset cmd_num=
     | n when n > 0 ->
             (* Set the number *)
             log ~func:((fun a b -> a) n) ()
-    | _ -> printf "Invalid number" (* TODO Make it settable *)
+    | _ -> printf "Invalid number\n" (* TODO Make it settable *)
 ;;