imp: journal: ignore tag subdirectives (ledger compat)
This commit is contained in:
parent
c58b9e6ac9
commit
fb7134c9a0
@ -578,6 +578,7 @@ tagdirectivep = do
|
|||||||
lift skipNonNewlineSpaces1
|
lift skipNonNewlineSpaces1
|
||||||
_ <- lift $ some nonspace
|
_ <- lift $ some nonspace
|
||||||
lift restofline
|
lift restofline
|
||||||
|
skipMany indentedlinep
|
||||||
return ()
|
return ()
|
||||||
|
|
||||||
endtagdirectivep :: JournalParser m ()
|
endtagdirectivep :: JournalParser m ()
|
||||||
|
|||||||
@ -2749,6 +2749,7 @@ capture ACCT REGEX
|
|||||||
check EXPR
|
check EXPR
|
||||||
define VAR=EXPR
|
define VAR=EXPR
|
||||||
expr EXPR
|
expr EXPR
|
||||||
|
tag NAME
|
||||||
--command-line-flag
|
--command-line-flag
|
||||||
```
|
```
|
||||||
|
|
||||||
|
|||||||
@ -55,6 +55,9 @@ check 1
|
|||||||
define var_name=$100
|
define var_name=$100
|
||||||
expr 1
|
expr 1
|
||||||
N USD
|
N USD
|
||||||
|
tag Receipt
|
||||||
|
check value =~ /pattern/
|
||||||
|
assert value != "foobar"
|
||||||
--command-line-flag
|
--command-line-flag
|
||||||
|
|
||||||
$ hledger -f- check
|
$ hledger -f- check
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user