diff options
Diffstat (limited to 'src/chart.ml')
-rw-r--r-- | src/chart.ml | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/src/chart.ml b/src/chart.ml index 194e3ba..39f97f9 100644 --- a/src/chart.ml +++ b/src/chart.ml | |||
@@ -29,9 +29,8 @@ let pp formatter { vals : int list; opts : Options.t } = | |||
29 | match Stdlib.compare s e with | 29 | match Stdlib.compare s e with |
30 | | 0 -> make_marker axis_spc s (height - s) "-" | 30 | | 0 -> make_marker axis_spc s (height - s) "-" |
31 | | x -> | 31 | | x -> |
32 | let ltr_chr, rtl_chr = | 32 | let dr, rd, ru, ur = Connector.of_kind opts.connector in |
33 | match x with 1 -> ("└", "┐") | _ -> ("┘", "┌") | 33 | let ltr_chr, rtl_chr = match x with 1 -> (dr, rd) | _ -> (ru, ur) in |
34 | in | ||
35 | let st, en = Stdlib.(min s e, max s e) in | 34 | let st, en = Stdlib.(min s e, max s e) in |
36 | let l = en - st |> saturating_sub 1 in | 35 | let l = en - st |> saturating_sub 1 in |
37 | let left, right = (repeat st space, repeat (height - l - st) space) in | 36 | let left, right = (repeat st space, repeat (height - l - st) space) in |