From 990e7f09b84e77ce7a3e2551f78e80496b7b27b0 Mon Sep 17 00:00:00 2001
From: voidlizard <dzuikov@gmail.com>
Date: Tue, 8 Oct 2024 11:22:49 +0300
Subject: [PATCH] fixme

---
 hbs2-git/git-remote-hbs2/Main.hs | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/hbs2-git/git-remote-hbs2/Main.hs b/hbs2-git/git-remote-hbs2/Main.hs
index d600be82..6ec3f9fd 100644
--- a/hbs2-git/git-remote-hbs2/Main.hs
+++ b/hbs2-git/git-remote-hbs2/Main.hs
@@ -175,6 +175,9 @@ main = do
                 ("list" : _) -> do
 
 
+                    -- FIXME: may-cause-reference-inconsistency
+                    --   надо брать max(head) для lwwref
+                    --   а не максимальную транзу, накаченную на репо
                     r'  <- runMaybeT $ withState do
                             tx <- selectMaxAppliedTx >>= lift  . toMPlus <&> fst