From 41e62885c4de6f2092fb0964023a32c7a2437669 Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Sat, 7 Jun 2025 15:03:12 -1000 Subject: [PATCH] dev: avoid a strange vscode/Haskell highlighting bug --- hledger-lib/Hledger/Data/Transaction.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/hledger-lib/Hledger/Data/Transaction.hs b/hledger-lib/Hledger/Data/Transaction.hs index 65b2b51aa..a3991a871 100644 --- a/hledger-lib/Hledger/Data/Transaction.hs +++ b/hledger-lib/Hledger/Data/Transaction.hs @@ -264,7 +264,7 @@ transactionAddTags t@Transaction{ttags} tags = t{ttags=ttags `union` tags} -- If the transaction already has these tags (with any value), do nothing. transactionAddHiddenAndMaybeVisibleTag :: Bool -> HiddenTag -> Transaction -> Transaction transactionAddHiddenAndMaybeVisibleTag verbosetags ht t@Transaction{tcomment=c, ttags} = - (t `transactionAddTags` ([ht] <> [vt|verbosetags])) + (t `transactionAddTags` ([ht] <> [ vt|verbosetags])) {tcomment=if verbosetags && not hadtag then c `commentAddTagNextLine` vt else c} where vt@(vname,_) = toVisibleTag ht