You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

24 lines
497 B

  1. module Page.About where
  2. import Prelude
  3. import Data.Symbol ( SProxy(..) )
  4. -- Halogen
  5. import Halogen as H
  6. import Halogen.HTML as HH
  7. type Slot p = forall query. H.Slot query Void p
  8. _about :: SProxy "about"
  9. _about = SProxy
  10. component :: forall q i o m. H.Component HH.HTML q i o m
  11. component =
  12. H.mkComponent
  13. { initialState: identity
  14. , render
  15. , eval: H.mkEval H.defaultEval
  16. }
  17. render :: forall state action m. state -> H.ComponentHTML action () m
  18. render _ = HH.h1_ [ HH.text "About Page" ]