       (dbpay/debit-payment uid eid (dbpay/get-debt uname ename date)) 
       (if (db/can-finish? ename date) 
         (finish ename date)))) 
-  (redirect "/user")) ; go to user page in any case
+  (pages/user)) ; go to user page in any case
 
 (defn pay-part [{ename :event-name date :date parts :parts :as params}]
   "Add participation of current user and selected event(given as param from 
   post). Parts in params is count of parts, that user want to pay"
-  (println "call pay-parts with: " ename " " date " '" parts "'")
   (let [uname (sess/get :username)
         uid (db/get-uid uname)
         eid (db/get-eid ename date)

(defn pay [{ename :event-name date :date :as params}]
  "Add participation of current user and selected event(given as param from 
  post). Parts in params is count of parts, that user want to pay"
  (println "call pay with: " ename " " date)
  (let [uname (sess/get :username)
        uid (db/get-uid uname)
        eid (db/get-eid ename date)]

    [ombs.db.payment :as dbpay]
    [ombs.validate :as isvalid]
    [ombs.funcs :refer [parse-int]]
    [ombs.handler.pages :as pages]
    [noir.session :as sess]
    [noir.response :refer [redirect] ]
    ))
