Skip to content

Commit

Permalink
Safely make the message directory if necessary
Browse files Browse the repository at this point in the history
Signed-off-by: Jon Ludlam <jonathan.ludlam@eu.citrix.com>
  • Loading branch information
Jon Ludlam committed Nov 2, 2012
1 parent 5885a67 commit f2c23f6
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion ocaml/xapi/xapi_message.ml
Original file line number Diff line number Diff line change
Expand Up @@ -305,7 +305,7 @@ let write ~__context ~_ref ~message =
gen := Db_cache_types.Manifest.generation (Db_cache_types.Database.manifest db);
Db_cache_types.Database.increment db));

Unixext.mkdir_safe message_dir 0o700;
Unixext.mkdir_rec message_dir 0o700;
let timestamp = ref (Date.to_float (message.API.message_timestamp)) in

if message_exists () then (Some (message_gen ()))
Expand Down

0 comments on commit f2c23f6

Please sign in to comment.