Haskell. Sort by second element in the list of tuples

Question

I have a code histogram, which shows the number of all characters in String.

histogram :: String -> [(Char, Int)]
histogram = foldr help [] wh