diff --git a/src/Tiny_httpd_dir.ml b/src/Tiny_httpd_dir.ml index ca1fc8c5..6fe9a6ac 100644 --- a/src/Tiny_httpd_dir.ml +++ b/src/Tiny_httpd_dir.ml @@ -103,7 +103,7 @@ let html_list_dir (module VFS:VFS) ~prefix ~parent d : string = Array.sort compare entries; let body = Buffer.create 256 in (* TODO: breadcrumbs for the path, each element a link to the given ancestor dir *) - Printf.bprintf body {| http_of_dir %S + Printf.bprintf body {| list directory %S

Index of %S

|} VFS.descr d;