simon/tiny_httpd
1
0
Fork 0
mirror of https://github.com/c-cube/tiny_httpd.git synced 2025-12-07 11:45:36 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

detail

Browse source
This commit is contained in:
Simon Cruanes 2022-03-03 22:20:15 -05:00
parent f40320a059
commit fd305b6173
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/Tiny_httpd_dir.ml
View file

@ -103,7 +103,7 @@ let html_list_dir (module VFS:VFS) ~prefix ~parent d : string =
Array.sort compare entries; Array.sort compare entries;
let body = Buffer.create 256 in let body = Buffer.create 256 in
(* TODO: breadcrumbs for the path, each element a link to the given ancestor dir *) (* TODO: breadcrumbs for the path, each element a link to the given ancestor dir *)
Printf.bprintf body {|<head><title> http_of_dir %S</title><meta charset="utf-8"> Printf.bprintf body {|<head><title> list directory %S</title><meta charset="utf-8">
</head><body> </head><body>
<h2> Index of %S</h2> <h2> Index of %S</h2>
|} VFS.descr d; |} VFS.descr d;