diff --git a/src/Handler/Users.hs b/src/Handler/Users.hs
index 01d46fc49..fd9d5823d 100644
--- a/src/Handler/Users.hs
+++ b/src/Handler/Users.hs
@@ -169,7 +169,7 @@ postUsersR = do
             )
           , ( "user-ident", FilterColumn $ \user criterion -> case getLast (criterion :: Last Text) of
               Nothing -> E.val True :: E.SqlExpr (E.Value Bool)
-              Just needle -> (E.castString (user E.^. UserIdent) `E.ilike` (E.%) E.++. E.val needle E.++. (E.%))
+              Just needle -> E.castString (user E.^. UserIdent) `E.ilike` (E.%) E.++. E.val needle E.++. (E.%)
             )
           , ( "user-email", FilterColumn $ \user criterion -> case getLast (criterion :: Last Text) of
               Nothing -> E.val True :: E.SqlExpr (E.Value Bool)