Author: Kevin Schoon [kevinschoon@gmail.com]
Hash: a0108f0daf5b5636ebb0b7046d0c4185dc165bed
Timestamp: Fri, 18 Sep 2020 18:49:34 +0000 (4 years ago)

+1 -1 +/-1 browse
reduce excess padding
1diff --git a/lib/note.ml b/lib/note.ml
2index 9ee17e3..3605486 100644
3--- a/lib/note.ml
4+++ b/lib/note.ml
5 @@ -237,7 +237,7 @@ module Display = struct
6 let current_max =
7 match List.nth accm i with Some len -> len | None -> 0
8 in
9- if col_length > current_max then col_length + 2 else current_max)
10+ if col_length > current_max then col_length + 1 else current_max)
11 row)
12 cells
13