Content.purs 759 B

123456789101112131415161718192021222324252627
  1. module ExampleWebExt.Content where
  2. import Prelude
  3. import Browser.DOM (getBrowserDom)
  4. import Effect (Effect)
  5. import Effect.Class.Console (logShow)
  6. import Effect.Console (log)
  7. import LinkedIn (getContext, run)
  8. import LinkedIn.Page.JobOffer (JobOfferPage)
  9. import LinkedIn.Page.Projects (ProjectsPage)
  10. import LinkedIn.Page.Skills (SkillsPage)
  11. import LinkedIn.Page.WorkExperiences (WorkExperiencesPage)
  12. import Type.Proxy (Proxy(..))
  13. main :: Effect Unit
  14. main = do
  15. log "[content] starting up"
  16. dom <- getBrowserDom
  17. getContext dom >>= logShow
  18. run (Proxy :: Proxy WorkExperiencesPage) dom >>= logShow
  19. run (Proxy :: Proxy SkillsPage) dom >>= logShow
  20. run (Proxy :: Proxy ProjectsPage) dom >>= logShow
  21. run (Proxy :: Proxy JobOfferPage) dom >>= logShow