shinyoukai/kosuzu
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Tilde compatible publication dirs, public_*/txt

Browse Source 
git-svn-id: file:///srv/svn/repo/kosuzu/trunk@12 eb64cd80-c68d-6f47-b6a3-0ada418499da
This commit is contained in:
fox
2022-06-21 17:22:12 +00:00
parent ee326c3cf8
commit 1c98321c9c
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
cli/publish.ml
View File

@@ -6,9 +6,9 @@ let targets () =
List.filter List.filter
(fun x -> try Sys.is_directory (snd x) with Sys_error _ -> false) (fun x -> try Sys.is_directory (snd x) with Sys_error _ -> false)
[ [
"htm", home ^ "/public/html"; "htm", home ^ "/public_html/txt";
"gmi", home ^ "/public/gemini"; "gmi", home ^ "/public_gemini/txt";
"", home ^ "/public/gopher"; "", home ^ "/public_gopher/txt";
] ]
open Logarion open Logarion