Adds default filtering and sorting

src/cljs/auto_ap/views/pages/ledger.cljs

@@ -7,7 +7,8 @@
     :as side-bar
     :refer [ledger-side-bar]]
    [auto-ap.views.pages.ledger.table :as table]
-   [auto-ap.views.utils :refer [with-user]]
+   [auto-ap.views.utils :refer [with-user date->str standard]]
+   [cljs-time.core :as time]
    [clojure.set :as set]
    [re-frame.core :as re-frame]
    [reagent.core :as reagent]
@@ -65,8 +66,10 @@
 
 (re-frame/reg-event-fx
  ::mounted
- (fn [_ _]
-   {::track/register {:id ::params
+ (fn [{:keys [db]} _]
+   {:db (assoc-in db [::data-page/settled-filters ::page :date-range] {:start (date->str (time/plus (time/now) (time/months -1))
+                                                                                         standard)})
+    ::track/register {:id ::params
                       :subscription [::data-page/params ::page]
                       :event-fn (fn [params] [::params-change params])}}))