From 85ce83f0b68f6bad92ac00c06254fd78df367561 Mon Sep 17 00:00:00 2001 From: Ben Sturmfels Date: Fri, 15 Mar 2024 08:53:45 +1100 Subject: [PATCH] Fix indentation --- src/import.clj | 22 +++++++++++----------- 1 file changed, 11 insertions(+), 11 deletions(-) diff --git a/src/import.clj b/src/import.clj index 427637a..f88ba0d 100644 --- a/src/import.clj +++ b/src/import.clj @@ -206,10 +206,10 @@ :currency "USD"}]] {:date date :desc (format "Monthly Payroll - %s - TAXES - %s" period name) :meta (assoc-project projects name {:project "Conservancy" - :program "Conservancy:Payroll" - :entity name - :receipt receipt-no - :approval "Financial/Employment-Records/memo-re-board-approval-of-payroll.txt"}) + :program "Conservancy:Payroll" + :entity name + :receipt receipt-no + :approval "Financial/Employment-Records/memo-re-board-approval-of-payroll.txt"}) :postings (concat retirement-postings liability-postings @@ -231,9 +231,9 @@ ;; Use eg. "US:Medicare", not "US:Tax:Medicare" as ;; in individual-taxes as confirmed by Rosanne. :meta (assoc-project projects - name - {:entity name - :payroll-type (str/replace (cat->payroll-type category) "Tax:" "")})}) + name + {:entity name + :payroll-type (str/replace (cat->payroll-type category) "Tax:" "")})}) total-liabilities (->> liability-postings (map :amount) (reduce + 0M)) unemploy-lines (filter (fn [{:keys [category type]}] (and (= type "Liability") @@ -243,10 +243,10 @@ :amount amount :currency "USD" :meta (assoc-project projects - name - {:entity (first (str/split category #" ")) - :memo name ; distinguishes multiple employees in one state - :payroll-type (str "US:" (cat->payroll-type category))})}) + name + {:entity (first (str/split category #" ")) + :memo name ; distinguishes multiple employees in one state + :payroll-type (str "US:" (cat->payroll-type category))})}) total-unemploy (->> unemploy-postings (map :amount) (reduce + 0M)) asset-postings [{:account "Assets:FR:Check2721" :amount (- (+ total-liabilities total-unemploy))