;; Account auth-menu fragment handler
;;
;; Renders the desktop + mobile auth menu (sign-in or user link).

(defhandler auth-menu (&key email)
  (~auth-menu
    :user-email (when email email)
    :account-url (app-url "account" "")))
