diff --git a/messages/uniworx/de.msg b/messages/uniworx/de.msg
index ce8245b9d..f6c9ef426 100644
--- a/messages/uniworx/de.msg
+++ b/messages/uniworx/de.msg
@@ -592,6 +592,7 @@ MenuSheetClone:  Als neues Übungsblatt klonen
 MenuCorrectionsUpload: Korrekturen hochladen
 MenuCorrectionsCreate: Abgaben registrieren
 MenuCorrectionsGrade: Abgaben bewerten
+MenuAuthPreds: Authorisierungseinstellungen
 
 AuthPredsActive: Aktive Authorisierungsprädikate
 AuthPredsActiveChanged: Authorisierungseinstellungen für aktuelle Sitzung gespeichert
diff --git a/src/Foundation.hs b/src/Foundation.hs
index 27e13bb45..4e10de61e 100644
--- a/src/Foundation.hs
+++ b/src/Foundation.hs
@@ -1206,6 +1206,14 @@ pageActions (ProfileR) =
       , menuItemModal = False
       , menuItemAccessCallback' = return True
       }
+  -- , MenuItem
+  --     { menuItemType = PageActionSecondary
+  --     , menuItemLabel = MsgMenuAuthPreds
+  --     , menuItemIcon  = Nothing
+  --     , menuItemRoute = SomeRoute AuthPredsR
+  --     , menuItemModal = True
+  --     , menuItemAccessCallback' = return True
+  --     }
   ]
 pageActions TermShowR =
   [ MenuItem
diff --git a/src/Handler/Home.hs b/src/Handler/Home.hs
index 148557f6f..ae3691266 100644
--- a/src/Handler/Home.hs
+++ b/src/Handler/Home.hs
@@ -268,7 +268,8 @@ postAuthPredsR = do
 
   ((authActiveRes, authActiveWidget), authActiveEnctype) <- runFormPost . renderAForm FormStandard
     $ AuthTagActive
-      <$> funcForm taForm (fslI MsgActiveAuthTags) True
+      <$> (submitButton -- for convenience, avoids frequent scrolling
+      *>  funcForm taForm (fslI MsgActiveAuthTags) True)
       <*  submitButton
 
   mReferer <- runMaybeT $ do