Landing.purs 856 Bytes
Newer Older
1
module Gargantext.Components.Data.Landing where
2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25


data LandingData = LandingData { name       :: String
                         , signature  :: String
                         , logoTitle  :: String
                         , imageTitle :: String
                         , blockTexts :: BlockTexts
                         }

data BlockTexts = BlockTexts { blocks :: Array BlockText }

data BlockText = BlockText { title      :: String
                           , href       :: String
                           , titleText  :: String
                           , icon       :: String
                           , text       :: String
                           , docButton  :: Button
                          }


data Button = Button { title :: String
                     , text  :: String
                     , href  :: String
                   }