<form method=post action=@{AuthPredsR} enctype=#{authActiveEnctype}>
  $maybe referer <- mReferer
    <input type=hidden name=#{toPathPiece GetReferer} value=#{toPathPiece referer}>
  ^{authActiveWidget}
