Commit

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

1	diff --git a/lib/note.ml b/lib/note.ml
2	index 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