diff --git a/dhall/Types.dhall b/dhall/Types.dhall
index ff279eb..0f02479 100644
--- a/dhall/Types.dhall
+++ b/dhall/Types.dhall
@@ -1095,6 +1095,7 @@ in  { CurID
     , BudgetCurrency
     , Exchange
     , TaggedAcnt
+    , AccountTree
     , Account
     , Placeholder
     , PretaxValue
diff --git a/lib/Internal/Utils.hs b/lib/Internal/Utils.hs
index 9b55cf0..909021e 100644
--- a/lib/Internal/Utils.hs
+++ b/lib/Internal/Utils.hs
@@ -325,7 +325,7 @@ toTx sc sa fromEntries toEntries r@TxRecord {trAmount, trDate, trDesc} = do
               { eAcnt = a
               , eCurrency = c
               , eValue = Just fromValue
-              , eComment = ""
+              , eComment = "" -- TODO actually fill this in
               , eTags = [] -- TODO what goes here?
               }
        in Tx