diff options
Diffstat (limited to 'app/Data')
| -rw-r--r-- | app/Data/Ledger.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/app/Data/Ledger.hs b/app/Data/Ledger.hs index ceca9da..53901cb 100644 --- a/app/Data/Ledger.hs +++ b/app/Data/Ledger.hs | |||
| @@ -50,9 +50,9 @@ data TxType | |||
| 50 | 50 | ||
| 51 | data IbanTag = AccountTag | CounterpartyIbanTag deriving (Eq, Enum, Ord, Show) | 51 | data IbanTag = AccountTag | CounterpartyIbanTag deriving (Eq, Enum, Ord, Show) |
| 52 | 52 | ||
| 53 | data UnitTag = FiledTag | GooglePayTag deriving (Eq, Enum, Ord, Show) | 53 | data UnitTag = FiledTag | GooglePayTag | AutoRoundSavingsTag deriving (Eq, Enum, Ord, Show) |
| 54 | 54 | ||
| 55 | data TextTag = DescTag | UserTag | CounterpartyNameTag | ReferenceTag | MandateIdTag | CreditorIdTag | OtherPartyTag | TransactionTag | TerminalTag | CardSeqNoTag deriving (Eq, Enum, Ord, Show) | 55 | data TextTag = DescTag | UserTag | CounterpartyNameTag | ReferenceTag | MandateIdTag | CreditorIdTag | OtherPartyTag | TransactionTag | TerminalTag | CardSeqNoTag | SavingsAccountTag deriving (Eq, Enum, Ord, Show) |
| 56 | 56 | ||
| 57 | data Label a where | 57 | data Label a where |
| 58 | TextLabel :: TextTag -> Label T.Text | 58 | TextLabel :: TextTag -> Label T.Text |