       (provided
         (v/validate-registration register-user-params s/is-duplicate-user?) => {}
         (s/store-user! email password) => ...user...
-        (token/create-token nil ...user...) => {:token ...token...}))
+        (cl-token/create-token nil ...user...) => {:token ...token...}))
 
 (fact "signed-in? returns true only when user and access_token are in the session"
       (tabular

            c/sign-in) => (throws Exception)
        (provided
          (s/authenticate-and-retrieve-user email password) => ...user...
          (client/fetch-client "client-id") => nil)))

(facts "about sign-in validation errors"
       (fact "user cannot sign in with blank password"

                                             :access_token ...token...}})
      (provided
        (s/authenticate-and-retrieve-user email password) => ...user...
        (cl-token/create-token nil ...user...) => {:token ...token...}))

(fact "user can register with valid credentials and is redirected to profile-created page, with user added to session"
      (-> (create-request :post "/register" register-user-params)
