Relation dates, with conversion condition upon it

git-svn-id: file:///srv/svn/repo/kosuzu/trunk@43 eb64cd80-c68d-6f47-b6a3-0ada418499da
2022-12-18 14:49:25 +00:00
parent 4dff69cb4a
commit 9587b7173a
7 changed files with 91 additions and 65 deletions
--- a/cli/publish.ml
+++ b/cli/publish.ml
@@ -8,7 +8,7 @@ let targets pubdir = List.fold_left
 let wizard () =
 	print_endline "No txt.conf found. It's required for the repository name & id. Create one? (y/N)";
 	match input_line stdin with
-	|"y"-> 
+	|"y"->
 		let title =
 			print_endline "Title for repository: ";
 			input_line stdin in