reworking logic
This commit is contained in:
parent
72ff0c80e4
commit
6934ae5f88
1 changed files with 2 additions and 2 deletions
|
@ -2,8 +2,8 @@ module Handler.Profile where
|
||||||
|
|
||||||
import Import
|
import Import
|
||||||
|
|
||||||
getProfileR :: Text -> Handler Html
|
getProfileR :: UserId -> Handler Html
|
||||||
getProfileR username = error "reworking logic" -- do
|
getProfileR userId = error "reworking logic" -- do
|
||||||
-- msu <- lookupSession "id"
|
-- msu <- lookupSession "id"
|
||||||
-- case msu of
|
-- case msu of
|
||||||
-- Just tempUserId -> do
|
-- Just tempUserId -> do
|
||||||
|
|
Loading…
Reference in a new issue