isAuthUserRetrieved :: Maybe AuthUser
                       -> I.Splice AppHandler
isAuthUserRetrieved Nothing = return []
isAuthUserRetrieved :: Maybe AuthUser
                       -> I.Splice AppHandler
isAuthUserRetrieved Nothing = return []
isAuthUserRetrieved Nothing = return []