title: Finding list entry with the highest count
body: <p>I have an <code>Entry</code> data type</p>
  
  <pre><code>data Entry = Entry {
      count :: Integer,
      name :: String }
  </code></pre>
  
  <p>Then I want to write a function, that takes the name and a list of <code>Entry</code>s as arguments an give me the <code>Entry</code>s with the highest count.  What I have so far is</p>
  
  <pre><code>searchEntry :: String -&gt; [Entry] -&gt; Maybe Integer
  searchEntry _ [] = Nothing
  searchEntry name1 (x:xs) = 
     if name x == name1
         then Just (count x)
         else searchEntry name xs 
  </code></pre>
  
  <p>That gives me the FIRST <code>Entry</code> that the function finds, but I want the <code>Entry</code> with the highest count. How can I implement that?</p>