@@ -337,7 +337,10 @@ t_toTitle_1stNotLower = and . notLow . T.toTitle . T.filter stable
337337 -- Surprise! The Spanish/Portuguese ordinal indicators changed
338338 -- from category Ll (letter, lowercase) to Lo (letter, other)
339339 -- in Unicode 7.0
340− stable c = c /= '\170' && c /= '\186'
340+ -- Oh, and there exist lowercase-only letters (see previous test)
341+ stable c = if isLower c
342+ then C.toUpper c /= c
343+ else c /= '\170' && c /= '\186'
341344
342345justifyLeft k c xs = xs ++ L.replicate (k - length xs) c
343346justifyRight m n xs = L.replicate (m - length xs) n ++ xs