From 12abd4362d93a05ed9d80c80a0b2c96abb945402 Mon Sep 17 00:00:00 2001 From: Jacob Prud'homme <2160185+jacobprudhomme@users.noreply.github.com> Date: Sat, 6 Jun 2026 16:34:52 +0200 Subject: [PATCH] Redact admin notes in Scrub backup mode --- src/Distribution/Server/Features/UserDetails/Backup.hs | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/src/Distribution/Server/Features/UserDetails/Backup.hs b/src/Distribution/Server/Features/UserDetails/Backup.hs index d759fce78..a25d741d0 100644 --- a/src/Distribution/Server/Features/UserDetails/Backup.hs +++ b/src/Distribution/Server/Features/UserDetails/Backup.hs @@ -68,7 +68,9 @@ userDetailsToCSV backuptype (Acid.UserDetailsTable tbl) then T.unpack (accountContactEmail udetails) else "hidden-email@nowhere.org" , infoToAccountKind udetails - , T.unpack (accountAdminNotes udetails) + , if backuptype == FullBackup + then T.unpack (accountAdminNotes udetails) + else "" ] where @@ -87,4 +89,3 @@ userDetailsToCSV backuptype (Acid.UserDetailsTable tbl) Nothing -> "" Just AccountKindRealUser -> "real" Just AccountKindSpecial -> "special" -