aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMarc Coquand <marc@mccd.space>2024-05-23 13:35:30 -0500
committerMarc Coquand <marc@mccd.space>2024-05-23 13:35:30 -0500
commit833716046de9b3ee8e4f277f383967c0d35ba28a (patch)
tree57dc23d055913308199f75e685f25b555971d084
parent60d41f32aff828aee0dd2e04d1c8e0e7fe6764a9 (diff)
downloadstitch-833716046de9b3ee8e4f277f383967c0d35ba28a.tar.gz
stitch-833716046de9b3ee8e4f277f383967c0d35ba28a.tar.bz2
stitch-833716046de9b3ee8e4f277f383967c0d35ba28a.zip
Irrelevant TODO
-rw-r--r--lib/headlines.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/headlines.ml b/lib/headlines.ml
index 17241ee..94e7709 100644
--- a/lib/headlines.ml
+++ b/lib/headlines.ml
@@ -77,7 +77,7 @@ let rec render
and elements =
Array.mapi
(fun i el ->
- if i + 1 == y - scroll (* TODO: Should be reverse *)
+ if i + 1 == y - scroll
then I.strf "%s" el |> I.pad ~l:2 ~t:(i + content_start)
else I.strf "%s" el |> I.pad ~l:2 ~t:(i + content_start))
(Basic.array_drop scroll content_pretty)