mirror of
https://github.com/simonmichael/hledger.git
synced 2024-11-15 00:27:46 +03:00
9 lines
246 B
Haskell
9 lines
246 B
Haskell
|
#!/usr/bin/env runhaskell
|
||
|
|
-- list the default journal's chart of accounts in --flat style
|
||
|
|
import Hledger.Read
|
||
|
|
import Hledger.Data
|
||
|
|
main = do
|
||
|
|
j <- myJournal
|
||
|
|
let l = journalToLedger nullfilterspec{empty=True} j
|
||
|
|
mapM_ putStrLn (accountnames l)
|