Author: Kevin Schoon [kevinschoon@gmail.com]
Hash: 8be5e687b1f7e11cce88ba7bb076231cd0f8e126
Timestamp: Wed, 16 Sep 2020 14:34:24 +0000 (4 years ago)

+1 -1 +/-1 browse
do not apply style to padding
1diff --git a/lib/note.ml b/lib/note.ml
2index 0316ff5..9e1f242 100644
3--- a/lib/note.ml
4+++ b/lib/note.ml
5 @@ -263,7 +263,7 @@ module Display = struct
6 let cell_width = List.nth_exn widths i in
7 let padding = cell_width - String.length text in
8 String.concat
9- [ accm; sprintf styles "%s%s" text (String.make padding ' ') ])
10+ [ accm; (sprintf styles "%s" text) ; (String.make padding ' ') ])
11 row;
12 ])
13 cells