correct link throughs

This commit is contained in:
2024-11-11 19:29:17 -08:00
parent 0e5407072e
commit aed9113306
4 changed files with 41 additions and 28 deletions

View File

@@ -260,8 +260,6 @@
(defn filter-period [pnl-data period]
(-> pnl-data
(update :data (fn [data]
#_(println "THE PERIOD IS" period
(take 3 ((group-by :period data) period)))
((group-by :period data) period)))
(update :filters (fn [f]
(assoc f :date-range period)))))
@@ -500,10 +498,6 @@
this-name-exists? (->> (:data p)
(filter (comp #{name} :name))
seq)]
(if ( = 40000 numeric-code)
(do (println "TEST HERE" numeric-code)
(clojure.pprint/pprint pnl-data))
)
(merge
(if this-name-exists?
{:format :dollar