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)
|