diff --git a/src/Handler/Admin/Avs.hs b/src/Handler/Admin/Avs.hs
index d455788ae..29b96ba2f 100644
--- a/src/Handler/Admin/Avs.hs
+++ b/src/Handler/Admin/Avs.hs
@@ -104,7 +104,7 @@ postAdminAvsR = do
             res <- avsQueryPerson fr
             case res of
               Left  err -> return . Just $ tshow err
-              Right jsn -> return . Just $ tshow jsn
+              Right jsn -> return . Just $ Text.replace "},Avs" "},\n Avs" $ tshow jsn
       mbPerson <- formResultMaybe presult procFormPerson
 
       ((sresult, swidget), senctype) <- runFormPost $ makeAvsStatusForm Nothing
@@ -113,7 +113,7 @@ postAdminAvsR = do
             res <- avsQueryStatus fr
             case res of
               Left err -> return . Just $ tshow err
-              Right jsn -> return . Just $ tshow jsn
+              Right jsn -> return . Just $ Text.replace "},Avs" "},\n Avs" $ tshow jsn
       mbStatus <- formResultMaybe sresult procFormStatus
 
       ((crUsrRes, crUsrWgt), crUsrEnctype) <- runFormPost $ identifyForm FIDAvsCreateUser $ \html ->