   (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))

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

(defn- event-retrieval-handler [e]

   [labelled-radio-button "expenses" "type"]
   [labelled-radio-button "incomes" "type"]])

(defn amount->pretty-string [amount]
  (str (/ amount 100) "€"))

(defn bank-event-table [events]
  [:div.table-responsive
   [:table.table.table-striped
