open Printf
+let () = Random.self_init ()
+
let config_file =
let default =
try Sys.getenv "MCLU_CONFIG"
| "on" ->
speclist := Mclu_onoff.get_arg_speclist ();
subcommand_run := Mclu_onoff.run ~on:true
+ | "reboot" ->
+ speclist := Mclu_reboot.get_arg_speclist ();
+ subcommand_run := Mclu_reboot.run
| "status" ->
speclist := Mclu_status.get_arg_speclist ();
subcommand_run := Mclu_status.run