Content.purs 379 B

123456789101112131415161718
  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 (extractFromDocument, getContext)
  8. main :: Effect Unit
  9. main = do
  10. log "[content] starting up"
  11. dom <- getBrowserDom
  12. getContext dom >>= logShow
  13. extractFromDocument dom >>= logShow