Skip to content

Commit

Permalink
change color of queries answers in terminal to black instead of red
Browse files Browse the repository at this point in the history
  • Loading branch information
Alidra committed Apr 12, 2024
1 parent 59faaab commit 7892960
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/handle/query.ml
Original file line number Diff line number Diff line change
Expand Up @@ -55,7 +55,7 @@ type result = (unit -> string) option
(** [return pp x] prints [x] using [pp] on [Stdlib.(!out_fmt)] at verbose
level 1 and returns a function for printing [x] on a string using [pp]. *)
let return : 'a pp -> 'a -> result = fun pp x ->
Console.out 1 (Color.red "%a") pp x;
Console.out 1 "%a" pp x;
Some (fun () -> Format.asprintf "%a" pp x)

(** [handle_query ss ps q] *)
Expand Down

0 comments on commit 7892960

Please sign in to comment.