Fix some warnings

src/LinkedIn/Jobs/JobOffer.purs

@@ -55,7 +55,7 @@ fromUI card = ado
           _ -> false
 
 getInsight ∷ String → JobsUnifiedTopCardElement UIElement → Maybe (TopCardInsight UIElement)
-getInsight i card = findOf _top_to_insights (isIcon i) card
+getInsight iType card = findOf _top_to_insights (isIcon iType) card
   where
     isIcon icon = case _ of
       TopCardInsight {icon: UIIcon i} -> i == icon

src/LinkedIn/JobsUnifiedTopCard.purs

@@ -5,7 +5,7 @@ import Prelude
 import Control.Monad.Error.Class (throwError)
 import Data.Foldable (class Foldable, foldMap, foldlDefault, foldrDefault)
 import Data.Generic.Rep (class Generic)
-import Data.Lens (Lens', Prism', lens', prism', traversed, view)
+import Data.Lens (Lens', Prism', Traversal', lens', prism', traversed, view)
 import Data.Lens.Record (prop)
 import Data.List.Types (NonEmptyList)
 import Data.Maybe (Maybe(..))
@@ -268,6 +268,7 @@ toPrimaryDescriptionText = view $ _top_card
   <<< _primary_description
   <<< prop (Proxy :: Proxy "text")
 
+_top_to_insights ∷ ∀ a. Traversal' (JobsUnifiedTopCardElement a) (TopCardInsight a)
 _top_to_insights = _top_card
   <<< prop (Proxy :: Proxy "insights")
   <<< traversed
@@ -276,6 +277,7 @@ _top_to_insights = _top_card
 _insight_to_content = prop (Proxy :: Proxy "content")
   <<< traversed
 
+_top_to_action_buttons ∷ ∀ a. Traversal' (JobsUnifiedTopCardElement a) a
 _top_to_action_buttons = _top_card
   <<< prop (Proxy :: Proxy "actions")
   <<< traversed