Skip to content

Commit bfd173c

Browse files
Update fs.md
Co-Authored-By: Patrick Ferris <[email protected]>
1 parent 27c2447 commit bfd173c

File tree

1 file changed

+4
-4
lines changed

1 file changed

+4
-4
lines changed

tests/fs.md

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff 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 ->

0 commit comments

Comments
 (0)