          [bank-event-table filtered-events]]
         [:div.col-md-4
          [:h1 "Recurring expenses"]
-         [bank-event-table @recurring-expenses]]]])))
+         [recurring-expense-info @recurring-expenses]]]])))

              ^{:key (:id event)}
              [:tr
               [:td (str (:transaction_date event))]
               [:td (str (/ (:amount event) 100) "€")]
               [:td (str (:recipient event))]])]]])

(defn- event-retrieval-handler [e]

  (let [month-filter (filters/month-filter month)]
    (filter month-filter events)))

(defn recurring-expense-info [recurring-expenses]
  [:div.list-group
   (for [event recurring-expenses]
     ^{:key (:id event)}
     [:p.list-group-item (str (:recipient event)
                              " "
                              (amount->pretty-string(:amount event)))])])

(defn events-page []
  (fn []
    (let [applied-filters (filters/combined-filter (:selected-filters @form-data))
