- (* If there is a jobs.cmo file, load it. *)
- let () =
- let file = sprintf "%s/jobs.cmo" jobsdir in
- if Sys.file_exists file then
- try Daemon.reload_file () with Failure _ -> () in
+ (* If there is a jobs__*.cmo/jobs__*.cmxs file, load it. *)
+ (try Daemon.reload_files () with Failure _ -> ());