WIP remove tags from tx

lib/Internal/Insert.hs

@@ -490,7 +490,6 @@ txPair day from to cur val desc = resolveTx tx
       Tx
         { txDescr = desc
         , txDate = day
-        , txTags = []
         , txSplits = [split from (-val), split to val]
         }
 

lib/Internal/Types.hs

@@ -385,7 +385,6 @@ instance FromDhall ExpSplit
 data Tx s = Tx
   { txDescr :: !T.Text
   , txDate :: !Day
-  , txTags :: ![T.Text]
   , txSplits :: ![s]
   }
   deriving (Generic)

lib/Internal/Utils.hs

@@ -173,8 +173,7 @@ toTx sc sa toSplits r@TxRecord {trAmount, trDate, trDesc} =
             , sTags = [] -- TODO what goes here?
             }
      in Tx
-          { txTags = []
-          , txDate = trDate
+          { txDate = trDate
           , txDescr = trDesc
           , txSplits = fromSplit : ss_
           }