Forgot to take accountField into account while calculating max. field index

This commit is contained in:
Dmitry Astapov 2011-01-23 20:34:03 +00:00
parent 5cbde7b8c6
commit e37d3a522d

View File

@ -111,6 +111,7 @@ maxFieldIndex r = maximumDef (-1) $ catMaybes [
,descriptionField r ,descriptionField r
,amountField r ,amountField r
,currencyField r ,currencyField r
,accountField r
] ]
rulesFileFor :: FilePath -> FilePath rulesFileFor :: FilePath -> FilePath