Feat/hakyll projects page migration

projects/ghc-performance-dashboards.markdown

@@ -0,0 +1,14 @@
+---
+status: ideation
+title: GHC Performance Dashboards
+link: https://gitlab.haskell.org/ghc/ghc
+link-text: https://gitlab.haskell.org/ghc/ghc
+subtitle: Project Leaders
+leader0name: Ben Gamari
+leader0img: project-leads/bg.png
+leader0mail: bgamari@gmail.com
+leader1name: Matthew Pickering
+leader1img: project-leads/mp.png
+leader1mail: matthewtpickering@gmail.com
+---
+The Haskell Foundation is working with the GHC team to help provide dashboard monitors for Haskell critical libraries (e.g. Aeson, Text, Bytestring).

projects/ghc-platform-ci.markdown

@@ -0,0 +1,14 @@
+---
+status: ideation
+title: GHC Platform CI
+link: https://gitlab.haskell.org/ghc/ghc
+link-text: https://gitlab.haskell.org/ghc/ghc
+subtitle: Project Leaders
+leader0name: Ben Gamari
+leader0img: project-leads/bg.png
+leader0mail: bgamari@gmail.com
+leader1name: Moritz Angermann
+leader1img: project-leads/ma.png
+leader1mail: moritz.angermann@gmail.com
+---
+The Haskell Foundation is working with the GHC team to provide a better build experience for GHC, allowing them to iterate quicker, fix bugs faster, and make our tools better.

projects/performance-tuning-book.markdown

@@ -0,0 +1,14 @@
+---
+status: ideation
+title: Performance Tuning Book
+link: https://github.com/haskellfoundation/gotta-go-fast
+link-text: haskellfoundation/gotta-go-fast
+subtitle: Project Leaders/Advisors
+leader0name: Gil Mizrahi
+leader0img: project-leads/gm.png
+leader0mail: gilmi@posteo.net
+leader1name: Emily Pillmore
+leader1img: exec-team/ep.png
+leader1mail: emily@haskell.foundation
+---
+A community-led book-writing effort that captures the general wisdom for how to make Haskell programs go fast.

projects/project-matchmaker.markdown

@@ -0,0 +1,11 @@
+---
+status: inprogress
+title: Project Matchmaker
+link: https://github.com/haskellfoundation/matchmaker
+link-text: github.com/haskellfoundation/matchmaker
+subtitle: Project Leaders/Advisors
+leader1name: Théophile "Hécate" Choutri
+leader1img: board-members/thc.png
+leader1mail: hecate@haskell.foundation
+---
+A common framework for linking Haskell maintainers to prospective contributors.

projects/text-utf8-migration.markdown

@@ -0,0 +1,14 @@
+---
+status: inprogress
+title: Text-UTF8 Migration
+link: https://github.com/haskell/text
+link-text: https://github.com/haskell/text
+subtitle: Project Leaders
+leader0name: Andrew Lelechenko
+leader0img: board-members/al.png
+leader0mail: andrew.lelechenko@gmail.com
+leader1name: Emily Pillmore
+leader1img: exec-team/ep.png
+leader1mail: emily@haskell.foundation
+---
+The UTF-8 character set encoding is the industry standard. Haskell Foundation is driving the effort behind the migration of the core text libraries to use UTF-8 as a default. This will have a positive effect on text performance of many Haskell programs.

projects/unified-haskell-installer.markdown

@@ -0,0 +1,17 @@
+---
+status: proposed
+title: Unified Haskell Installer
+link: https://gitlab.haskell.org/haskell/ghcup-hs
+link-text: haskell/ghcup-hs
+subtitle: Project Leaders/Advisors
+leader0name: Chris Dornan
+leader0img: board-members/cd.png
+leader0mail: chris@chrisdornan.com
+leader1name: Julian Ospald
+leader1img: project-leads/jo.png
+leader1mail: hasufell@posteo.de
+leader2name: Michael Snoyman
+leader2img: board-members/ms.png
+leader2mail: michael@snoyman.com
+---
+Building a universal installer for Haskell toolchains. This effort brings together the Stack and GHCup teams to help build a single installer that will allow HLS, Cabal, Stack, and GHC installations on all major platforms from a single tool.

projects/vector-types-proposal.markdown

@@ -0,0 +1,11 @@
+---
+status: ideation
+title: Vector Types Proposal
+link: https://www.snoyman.com/blog/2021/03/haskell-base-proposal/
+link-text: vector types proposal
+subtitle: Project Leaders
+leader0name: Michael Snoyman
+leader0img: board-members/ms.png
+leader0mail: michael@snoyman.com
+---
+A proposal for providing a common fusion framework and underlying primitives for stringy data structures in base.

site.hs

@@ -5,7 +5,7 @@
 
 import Hakyll
 import Control.Monad (filterM)
-import Data.List (sortBy)
+import Data.List (sortOn)
 import Data.Ord (comparing)
 
 config :: Configuration
@@ -25,11 +25,10 @@ main = hakyll $ do
 
     match "index.html" $ do
         route idRoute
-        compile $ do
-            getResourceBody
-                >>= applyAsTemplate defaultContext
-                >>= loadAndApplyTemplate "templates/boilerplate.html" defaultContext
-                >>= relativizeUrls
+        compile $ getResourceBody
+            >>= applyAsTemplate defaultContext
+            >>= loadAndApplyTemplate "templates/boilerplate.html" defaultContext
+            >>= relativizeUrls
 
     match "affiliates/*.markdown" $ do
         route $ setExtension "html"
@@ -41,31 +40,46 @@ main = hakyll $ do
     match "affiliates/index.html" $ do
         route idRoute
         compile $ do
-            ctx <- affiliatesCtx <$>
-                sortBy (comparing itemIdentifier) <$> loadAll "affiliates/*.markdown"
+            ctx <- affiliatesCtx . sortOn itemIdentifier <$> loadAll "affiliates/*.markdown"
 
             getResourceBody
                 >>= applyAsTemplate ctx
                 >>= loadAndApplyTemplate "templates/boilerplate.html" ctx
                 >>= relativizeUrls
 
-    -- match "**/index.html" $ do
-    --     route idRoute
-    --     compile $ do
-    --         getResourceBody
-    --             >>= applyAsTemplate defaultContext
-    --             >>= loadAndApplyTemplate "templates/boilerplate.html" defaultContext
-    --             >>= relativizeUrls
+    match "projects/*.markdown" $ compile pandocCompiler
 
-    match "templates/*" $ compile templateBodyCompiler
+    create ["projects/index.html"] $ do
+        route idRoute
+        compile $ do
+            ctx <- projectsCtx . sortOn itemIdentifier <$> loadAll "projects/*.markdown"
+
+            makeItem ""
+                >>= loadAndApplyTemplate "templates/projects/list.html"  ctx
+                >>= loadAndApplyTemplate "templates/boilerplate.html"   ctx
+                >>= relativizeUrls
+
+    match "templates/**" $ compile templateBodyCompiler
+    -- match "templates/**/*" $ compile templateBodyCompiler
 
 -- | Partition affiliates into affiliates and pending
 affiliatesCtx :: [Item String] -> Context String
 affiliatesCtx tuts =
-    listField "affiliated" defaultContext (ofStatus "affiliated") <>
-    listField "pending" defaultContext (ofStatus "pending") <>
+    listField "affiliated" defaultContext (ofStatus "affiliated" tuts) <>
+    listField "pending" defaultContext (ofStatus "pending" tuts) <>
     defaultContext
-  where
-    ofStatus ty = filterM (\item -> do
+
+-- | Partition projects into : Ideation | Proposed | In Progress | Completed
+projectsCtx :: [Item String] -> Context String
+projectsCtx p =
+    listField "ideas" defaultContext (ofStatus "ideation" p) <>
+    listField "proposals" defaultContext (ofStatus "proposed" p) <>
+    listField "inprogress" defaultContext (ofStatus "inprogress" p) <>
+    listField "completed" defaultContext (ofStatus "completed" p) <>
+    defaultContext
+
+ofStatus :: String -> [Item String] -> Compiler [Item String]
+ofStatus v = filterM (\item -> do
         mbStatus <- getMetadataField (itemIdentifier item) "status"
-        return $ Just ty == mbStatus) tuts
+        return $ Just v == mbStatus
+    )