getListenNowR      :: RealmId -> Path -> APIHandler TypedContent
getListenNowR ri p = lift $ respondWithSource (notificationsFor ri p)
getListenNowR      :: RealmId -> Path -> APIHandler TypedContent
getListenNowR ri p = lift $ respondWithSource (notificationsFor ri p)
getListenNowR ri p = lift $ respondWithSource (notificationsFor ri p)