diff --git a/hledger/Hledger/Cli/Convert.hs b/hledger/Hledger/Cli/Convert.hs index 7f4ede6c5..403c6b96b 100644 --- a/hledger/Hledger/Cli/Convert.hs +++ b/hledger/Hledger/Cli/Convert.hs @@ -92,7 +92,7 @@ convert opts = do csvparse <- parseCsv csvfile let records = case csvparse of Left e -> error' $ show e - Right rs -> reverse $ filter (/= [""]) rs + Right rs -> filter (/= [""]) rs exists <- doesFileExist rulesfile if (not exists) then do hPrintf stderr "creating conversion rules file %s, edit this file for better results\n" rulesfile diff --git a/tests/convert-with-in-and-out-fields.test b/tests/convert-with-in-and-out-fields.test index 8ee5a258c..390af692f 100644 --- a/tests/convert-with-in-and-out-fields.test +++ b/tests/convert-with-in-and-out-fields.test @@ -4,13 +4,13 @@ rm -rf convert.rules$$; printf 'base-account Assets:MyAccount\ndate-field 0\ndat 10/2009/09,Flubber Co,50, 11/2009/09,Flubber Co,,50 >>> -2009/09/11 Flubber Co - expenses:unknown $50 - Assets:MyAccount $-50 - 2009/09/10 Flubber Co income:unknown $-50 Assets:MyAccount $50 +2009/09/11 Flubber Co + expenses:unknown $50 + Assets:MyAccount $-50 + >>>2 /using conversion rules file convert.rules[0-9]*.$/ >>>=0