aynish/muneem
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

last minute updates

Browse source
This commit is contained in:
Anish Lakhwara 2022-12-01 14:55:06 +10:00
parent 28e0f2bee7
commit cbe8765203
3 changed files with 5 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
src/muneem/etaoin.clj
View file

@ -3,7 +3,8 @@
[clojure.java.shell :refer [sh]] [clojure.java.shell :refer [sh]]
[etaoin.keys :as k])) [etaoin.keys :as k]))
(def driver (e/chrome {:args ["--disable-blink-features=AutomationControlled" "--maximize"] (def driver (e/chrome {:headless true
:args ["--disable-blink-features=AutomationControlled" "--maximize"]
:prefs {:profile.default_content_setting_values.automatic_downloads 1}})) :prefs {:profile.default_content_setting_values.automatic_downloads 1}}))
;:download-dir "./documents/" ;:download-dir "./documents/"

2
src/muneem/import.clj
View file

@ -385,5 +385,5 @@
(mapv write-transaction-to-file (drop-last (take-csv csv))) (mapv write-transaction-to-file (drop-last (take-csv csv)))
(mapv write-transaction-to-file-savings (drop-last (take-csv csv)))) (mapv write-transaction-to-file-savings (drop-last (take-csv csv))))
(write-accounts beancount-file) (write-accounts beancount-file)
(assert-balance (last (take-csv csv)) checking?) #_(assert-balance (last (take-csv csv)) checking?)
(reset! new-accounts #{})) (reset! new-accounts #{}))

4
src/muneem/main.clj
View file

@ -13,9 +13,9 @@
(defn bootstrap (defn bootstrap
[] []
(import/main "./documents/checking-last-year.csv" true) (import/main "./documents/checking-last-year.csv" true)
(import/main "./documents/checking-this-year.csv" true) (import/main "./documents/checking-this-year-until-23-nov.csv" true)
(import/main "./documents/savings-last-year.csv" false) (import/main "./documents/savings-last-year.csv" false)
(import/main "./documents/savings-this-year.csv" false)) (import/main "./documents/savings-this-year-until-23-nov.csv" false))
(comment (comment
(-main) (-main)