(ns app-admin.models.current-user
(:require [noir.session :as session]
[app-admin.models.users :as users]))
(def get-id
(session/get :uid))
(defn set-user! [user]
(session/put! :uid {:_id user}))
Give me an exception for get-id
ClassCastException clojure.lang.Var$Unbound cannot be cast to clojure.lang.IDeref clojure.core/deref (core.clj:2078)
So set-user! binds correctly, but get-id doesn't seem to...
=> (get-id)
llegalStateException Attempting to call unbound fn: #'app-admin.models.current-user/get-id clojure.lang.Var$Unbound.throwArity (Var.java:43)
(def get-id
(session/get :uid))(defn set-user! [user]
(session/put! :uid {:_id user}))
=> (meta #'get-id)
{:ns #<Namespace app-admin.models.current-user>, :name get-id}
So it's there, the fn is bound [...]