nix flake update

.github/workflows/ci.yaml

@@ -17,3 +17,4 @@ jobs:
           dist-newstyle
         key: ${{ runner.os }}-${{ matrix.ghc }}
     - run: nix develop -c task api:test
+    - run: nix flake check

.gitignore

@@ -5,3 +5,4 @@
 .pre-commit-config.yaml
 .task
 result
+dist-newstyle

src/API/Config.hs

@@ -72,15 +72,15 @@ databaseConfigCodec :: TomlCodec DatabaseConfig
 databaseConfigCodec =
   DatabaseConfig
     <$> Toml.diwrap (Toml.text "host")
-    .= host
+      .= host
     <*> Toml.diwrap (Toml.int "port")
-    .= port
+      .= port
     <*> Toml.diwrap (Toml.text "dbname")
-    .= dbname
+      .= dbname
     <*> Toml.diwrap (Toml.text "user")
-    .= user
+      .= user
     <*> Toml.diwrap (Toml.text "password")
-    .= password
+      .= password
 
 -- |
 -- A bidirectional codec for 'ApiConfig'
@@ -93,6 +93,6 @@ configCodec :: TomlCodec Config
 configCodec =
   Config
     <$> Toml.table databaseConfigCodec "database"
-    .= database
+      .= database
     <*> Toml.table apiConfigCodec "api"
-    .= api
+      .= api

src/Tagger/Content.hs

@@ -32,4 +32,4 @@ instance (ToJSON tag) => ToJSON (Content tag)
 -- |
 -- checks whether a 'Content' is indexed by all the provided 'tag's
 hasAllTags :: (Eq tag) => [tag] -> Content tag -> Bool
-hasAllTags tags' content = and $ (\tag -> tag `elem` tags content) <$> tags'
+hasAllTags tags' content = all (\tag -> tag `elem` tags content) tags'