From 3fc144bc78399f2d0b3b14ceb855a21e73753303 Mon Sep 17 00:00:00 2001 From: Saku Laesvuori Date: Mon, 11 Sep 2023 21:31:45 +0300 Subject: [PATCH] Don't show userIDs in error messages --- src/Client/Types.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/Client/Types.hs b/src/Client/Types.hs index 57175ed..9c6bc47 100644 --- a/src/Client/Types.hs +++ b/src/Client/Types.hs @@ -112,9 +112,9 @@ requirePermission scope permission = ifM (hasPermission scope permission) renderPermission ReadOnly = "lukuoikeuden" renderPermission None = "nollaoikeuden" renderScope OwnProfile = "omaan profiliin" - renderScope (Profile user) = "käyttäjän '" <> show user <> "' profiliin" + renderScope (Profile _) = "käyttäjän profiliin" renderScope OwnTokens = "omiin tokeneihin" -- TODO kunnon suomennos - renderScope (Tokens user) = "käyttäjän '" <> show user <> "' tokeneihin" -- TODO kunnon suomennos + renderScope (Tokens _) = "käyttäjän tokeneihin" -- TODO kunnon suomennos renderScope Members = "kaikkiin jäseniin" renderScope Applications = "jäsenhakemuksiin"