Changeset 53 in code for trunk/cli/listing.ml

Timestamp:

Oct 21, 2023, 12:41:04 AM (18 months ago)

Author:

yakumo.izuru

Message:

Use pipes to separate fields on the listing subcommand

Signed-off-by: Izuru Yakumo <yakumo.izuru@…>

File:

• trunk/cli/listing.ml (modified) (1 diff)

trunk/cli/listing.ml

@@ -7 +7 @@
         let predicates = A.predicate A.authored authors_opt @ A.predicate A.topics topics_opt in
         let predicate text = List.fold_left (fun a e -> a && e text) true predicates in
-        let list_text (t, fnames) = Printf.printf "%s %s %s 𐄁 %s%s\n"
+        let list_text (t, fnames) = Printf.printf "%s | %s | %s | %s %s\n"
                 (Text.short_id t) Date.(pretty_date @@ listing t.Text.date)
                 (Person.Set.to_string ~names_only:true t.Text.authors)