postToggleFeatureR :: Feature -> Handler RepHtml
postToggleFeatureR feature = do
  user <- requireAuth
  runDB $ toggleUserFeature feature user
  redirect TasksR
postToggleFeatureR :: Feature -> Handler RepHtml
postToggleFeatureR feature = do
  user <- requireAuth
  runDB $ toggleUserFeature feature user
  redirect TasksR
postToggleFeatureR feature = do
  user <- requireAuth
  runDB $ toggleUserFeature feature user
  redirect TasksR