File tree Expand file tree Collapse file tree 1 file changed +4
-4
lines changed Expand file tree Collapse file tree 1 file changed +4
-4
lines changed Original file line number Diff line number Diff line change @@ -95,10 +95,10 @@ let try_symlink ~link_to path =
9595 | s -> traceln "symlink %a -> %S" Path.pp path link_to
9696 | exception ex -> traceln "@[<h>%a@]" Eio.Exn.pp ex
9797
98- (* let try_chmod ~perm path =
98+ let try_chmod ~perm path =
9999 match Eio.Path.chmod ~perm path with
100- | () -> Eio.traceln "chmod %o -> %a" perm Eio.Path.pp path
101- | exception ex -> Eio.traceln "@[<h>%a@] " Eio.Exn.pp ex *)
100+ | () -> Eio.traceln "Permissions changed to %o for %a" perm Eio.Path.pp path
101+ | exception ex -> Eio.traceln "Failed to change permissions: %a " Eio.Exn.pp ex
102102```
103103
104104# Basic test cases
@@ -233,7 +233,7 @@ Appending to an existing file:
233233- : unit = ()
234234```
235235
236- Creating directories with nesting, symlinks, chmond, etc:
236+ Creating directories with nesting, symlinks, etc:
237237
238238``` ocaml
239239# run ~clear:["to-subdir"; "to-root"; "dangle"] @@ fun env ->
You can’t perform that action at this time.
0 commit comments