reworking logic

This commit is contained in:
nek0 2014-08-14 02:26:21 +02:00
parent 72ff0c80e4
commit 6934ae5f88

View file

@ -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