Compare commits

..

No commits in common. "47016be10307431d0b562944287f61aa11fa4268" and "27d4a03daf327a88a53870184c75704770b3e58a" have entirely different histories.

2 changed files with 3 additions and 8 deletions

View file

@ -368,10 +368,6 @@
#_(sh "cp" beancount-file "/home/anish/usr/finance/")
(sh "scp" "documents/ledger.beancount" "mossnet.lan:~/usr/finance/ledger.beancount"))
(defn backup-beancount-file
[]
(sh "cp" beancount-file "./documents/backup.beancount"))
(defn assert-balance
[transaction checking?]
(let [b (balance transaction)
@ -387,8 +383,8 @@
[csv checking? & _args]
(read-accounts beancount-file)
(if checking?
(mapv write-transaction-to-file (take-csv csv))
(mapv write-transaction-to-file-savings (take-csv csv)))
(mapv write-transaction-to-file (drop-last (take-csv csv)))
(mapv write-transaction-to-file-savings (drop-last (take-csv csv))))
(write-accounts beancount-file)
(assert-balance (first (take-csv csv)) checking?)
(assert-balance (last (take-csv csv)) checking?)
(reset! new-accounts #{}))

View file

@ -4,7 +4,6 @@
(defn -main
[& _args]
(import/backup-beancount-file)
(download/download-csv)
(download/move-download)
(import/main "./documents/checking.csv" true)