On Mon, Aug 27, 2012 at 5:52 AM, Arthur Clemens wrote:

Did something change in Yesod? This part doesn't seem to work:

isAuthorized route isWrite = do mauth <- maybeAuth runDB $ mauth `isAuthorizedTo` permissionsRequiredFor route isWrite

Returns

Foundation.hs:109:20: Couldn't match expected type `(UserId, User)' with actual type `Entity val0'

To fix this bug you'll need to change all '(UserId, User)'s into 'Entity User's. For example: hasPermissionTo :: Entity User -> Permission -> YesodDB sub Blog AuthResult (Entity _ user) `hasPermissionTo` Post = ... etc. I'm not sure if there's anything else missing. Cheers, =) -- Felipe.