Samhain 21
Converter - type selection - subdir conversion - htm extension Gemini - index.gmi - topics and latest - gmi.atom feed Add pull (http(s)) operation - peers.pub.conf and peers.priv.conf HTML5 format & fixes by Novaburst Phony target (thanks Gergely) May Basic unit renamed from Note to Text. New modular text-parser, internal to Logarion, for generic notation parsing. The default input format is now a much plainer text. Logarion created texts have part of the UUID in filename. Logarion's index re-written in Messagepack format. Removed `indices` command. They are generated during `convert`. git-svn-id: file:///srv/svn/repo/kosuzu/trunk@2 eb64cd80-c68d-6f47-b6a3-0ada418499da
This commit is contained in:
9
lib/peers.ml
Normal file
9
lib/peers.ml
Normal file
@@ -0,0 +1,9 @@
|
||||
let public_fname = "peers.pub.conf"
|
||||
let private_fname = "peers.priv.conf"
|
||||
|
||||
let fold_file fn init file = match open_in file with
|
||||
| exception (Sys_error msg) -> prerr_endline msg; init
|
||||
| file ->
|
||||
let rec read acc = try read (fn (input_line file) acc)
|
||||
with End_of_file -> close_in file; acc in
|
||||
read init
|
||||
Reference in New Issue
Block a user