imp:journal: better error when attempting to include a rules file

This commit is contained in:
Simon Michael 2025-09-01 05:52:23 +01:00
parent efe1d11edb
commit e37caf0f27
2 changed files with 2 additions and 2 deletions

View File

@ -46,7 +46,7 @@ reader sep = Reader
{rFormat = Sep sep
,rExtensions = [show sep]
,rReadFn = parse sep
,rParser = const $ fail "sorry, CSV files can't be included yet" -- PARTIAL:
,rParser = const $ fail "sorry, CSV files can't be included yet"
-- This unnecessarily shows the CSV file's first line in the error message,
-- but gives a more useful message than just calling error'.
-- XXX Note every call to error' in Hledger.Read.* is potentially a similar problem -

View File

@ -108,7 +108,7 @@ reader = Reader
{rFormat = Rules
,rExtensions = ["rules"]
,rReadFn = parse
,rParser = error' "sorry, rules files can't be included" -- PARTIAL:
,rParser = const $ fail "sorry, rules files can't be included yet"
}
isFileName f = takeFileName f == f