diff --git a/src/Handler/Utils/Users.hs b/src/Handler/Utils/Users.hs
index 7d95a2e15..9e55182cf 100644
--- a/src/Handler/Utils/Users.hs
+++ b/src/Handler/Utils/Users.hs
@@ -124,6 +124,7 @@ guessUser (((Set.toList . toNullable) <$>) . Set.toList . dnfTerms -> criteria)
                   , b <- [True,False]
                   ]
           
+          -- Assuming the input list is sorted in descending order by closeness:
           takeClosest []  = []
           takeClosest [x] = [x]
           takeClosest (x:x':xs)