>
> You're still not using wrap-keyword-params.
>
Thanks. I changed the routes so I now have:
(def app
(-> app-routes
(friend/authenticate {:credential-fn (partial creds/bcrypt-
credential-fn (:users @interactions))
:workflows [(workflows/interactive-
form)]})
(wrap-resource "public")
(wrap-session {:cookie-name "discovery-session" :cookie-attrs
{:max-age 10000 }})
(wrap-cookies)
(wrap-keyword-params)
(wrap-nested-params)
(wrap-params)))
Then I go here with my browser:
localhost:40000/login
and I copy and paste the username and password from the :users map
inside of @interactions. Then I hit the submit button. I get
redirected back to the login page. The URL is now:
http://localhost:40000/login?&login_failed=Y&username=lawrence
I am trying to think of what I can change so I can see some of the
intermediate steps. How do I debug this and find out what the point of
failure is? Part of me is thinking that I could clone Friend from
github and build my own custom version of it, with debugging code
throughout it. But most of me thinks that is stupid, since it works
for others, so the problem can not be in Friend, it must be something
that I am doing.
---- lawrence
On 16 Sty, 09:55, Chas Emerick <c...@cemerick.com> wrote:
> On Jan 16, 2013, at 9:07 AM, larry google groups wrote:
>
>
>
>
>
>
>
>
>
>
>
> > I define a var with user info like this:
>
> > (ns kiosks-clojure.fake-data-for-development
> > (:require [cemerick.friend :as friend]
> > (cemerick.friend [workflows :as workflows]
> > [credentials :as creds])))
> > (def fake-data
> > {
> > :users {:root {:username "la...@wonderful.com"
> > :password (creds/hash-bcrypt "admin_password")
> > :roles #{::admin}
> > :created_at "2013-01-08 14:00:00"
> > :telephone-numbers [{:country "USA" :number "434 825
> > 7694"}
> > {:country "USA" :number "732 364
> > 3640"}]}
> > :jane {:username "j...@wonderful.com"
> > :password (creds/hash-bcrypt "user_password")
> > :roles #{::user}
> > :created_at "2013-01-10 16:40:34"
> > :telephone-numbers []}}
> > })
>
> > Then in my core namespace, I add this to an atom:
>
> > (def interactions (atom fd/fake-data))
>
> > And then later I fetch this and add this to the authentication of
> > friend:
>
> > (def app
> > (-> app-routes
> > (friend/authenticate {:credential-fn (partial creds/bcrypt-
> > credential-fn (:users @interactions))
> > :workflows [(workflows/interactive-
> > form)]})
> > (wrap-resource "public")
> > (wrap-session {:cookie-name "discovery-session" :cookie-attrs
> > {:max-age 10000 }})
> > (wrap-cookies)
> > (wrap-params)))
>
> > Any thoughts about where I should try to debug this?
>
> You're still not using wrap-keyword-params.
>
> - Chas
--
You received this message because you are subscribed to the Google
Groups "Clojure" group.
To post to this group, send email to clojure@googlegroups.com
Note that posts from new members are moderated - please be patient with your
first post.
To unsubscribe from this group, send email to
clojure+unsubscr...@googlegroups.com
For more options, visit this group at
http://groups.google.com/group/clojure?hl=en
