OCaml CLI and library to the Karakeep bookmarking app
trim
+1
-2
-1
lib/karakeep.ml
-1
lib/karakeep.ml
···
186
186
let parse_bookmark_response json =
187
187
(* The response format is different based on endpoint, need to handle both structures *)
188
188
(* Print the whole JSON structure for debugging *)
189
-
Printf.eprintf "Full response JSON: %s\n" (J.value_to_string json);
190
189
191
190
try
192
191
(* Standard list format with total count *)
+1
-1
test/test.ml
+1
-1
test/test.ml
···
3
3
4
4
let print_bookmark bookmark =
5
5
let title = match bookmark.title with Some t -> t | None -> "(No title)" in
6
-
Printf.printf "- %s\n URL: %s\n Created: %s\n Tags: %s\n\n" title
6
+
Printf.printf "- %s\n URL: %s\n Created: %s\n Tags: %s\n---\n\n" title
7
7
bookmark.url
8
8
(Ptime.to_rfc3339 bookmark.created_at)
9
9
(String.concat ", " bookmark.tags)