Add even more categories (#159)

* Remove extraneous imports

* Add Parallelism and normalise more categories

* Normalise systems programming

* style

Co-authored-by: mergify[bot] <37929162+mergify[bot]@users.noreply.github.com>

cbits/categorise.dl

@@ -48,13 +48,14 @@ flora_category("maths", "Mathematics", "Numerical and Mathematical packages").
 flora_category("monads", "Monads", "Effectful sequential computations").
 flora_category("network", "Network Development", "Connection pools, DNS, HTTP, API clients and network protocols").
 flora_category("nlp", "Natural Language Processing", "Tooling to work with natural languages").
+flora_category("parallelism", "Parallelism", "Parallel programming").
 flora_category("parser-implementations", "Parser Implementations", "Parsing data formats").
 flora_category("parsers","Parsers", "Libraries to ingest and parse data").
 flora_category("parsing", "Parsing", "Parser generators, combinators and tools to help with parsing").
 flora_category("physics", "Physics", "The study of matter, its consituents, motion, and behaviour").
 flora_category("prelude", "Prelude", "Libraries that provide default imports").
 flora_category("streaming", "Streaming", "Data streaming for continuous processing").
-flora_category("system", "System Programming", "Programming and communicating with the Operating System").
+flora_category("system", "Systems Programming", "Programming and communicating with the Operating System").
 flora_category("template-haskell", "Template Haskell", "Metaprogramming with Template Haskell").
 flora_category("testing", "Testing", "Test frameworks").
 flora_category("text", "Text", "Working with textual data and algorithms").
@@ -132,6 +133,8 @@ normalise_category("UserInterface", "GUI").
 normalise_category("UI", "GUI").
 normalise_category("User Interfaces", "GUI").
 
+normalise_category("graphics", "Graphics").
+
 normalise_category("Code Generation", "FFI").
 normalise_category("Elm", "FFI").
 normalise_category("TypeScript", "FFI").
@@ -176,6 +179,7 @@ normalise_category("Containers", "Data Structures").
 normalise_category("Game", "Game Development").
 
 normalise_category("Concurrent", "Concurrency").
+normalise_category("Parallel", "Parallelism").
 
 normalise_category("Distributed Computing", "Distributed Systems & Computation").
 
@@ -184,3 +188,5 @@ normalise_category("system", "System Programming").
 normalise_category("System", "System Programming").
 
 normalise_category("Distribution", "Package Distribution").
+
+normalise_category("SYstem", "Systems Programming").

src/Flora/Search.hs

@@ -1,23 +1,18 @@
 module Flora.Search where
 
-import Data.Text (Text)
-import Data.Vector (Vector)
-import qualified Data.Vector as Vector
-
-import Control.Monad.IO.Class
 import Data.Aeson
 import qualified Data.List as List
+import Data.Text (Text)
 import Data.Text.Display (Display (..))
 import qualified Data.Text.Lazy.Builder as Builder
-import Database.PostgreSQL.Entity.DBT (withPool)
+import Data.Vector (Vector)
+import qualified Data.Vector as Vector
 import Distribution.Types.Version (Version)
-import Flora.Environment (FloraEnv (..))
+import qualified Log
+
 import Flora.Model.Package (Namespace (..), PackageName, formatPackage)
 import qualified Flora.Model.Package.Query as Query
 import FloraWeb.Server.Auth (FloraPage)
-import FloraWeb.Session (Session (..), getSession)
-import FloraWeb.Types (fetchFloraEnv)
-import qualified Log
 import Optics.Core
 
 data SearchAction