Use purs-tidy for formatting

.tidyrc.json

@@ -0,0 +1,8 @@
+{
+  "indent": 2,
+  "operatorsFile": null,
+  "ribbon": 1,
+  "typeArrowPlacement": "first",
+  "unicode": "source",
+  "width": null
+}

package.json

@@ -3,16 +3,14 @@
   "repository": "https://github.com/drewolson/purescript-biscotti-cookie",
   "license": "MIT",
   "scripts": {
-    "ci": "npm run test && npm run format:check",
+    "ci": "npm run test",
     "test": "spago test",
-    "format": "find src test -name \"*.purs\" | xargs -n1 purty format --write",
-    "format:check": "find src test -name \"*.purs\" | xargs -n1 purty validate"
+    "format": "purs-tidy format-in-place 'src/**/*.purs' && purs-tidy format-in-place 'test/**/*.purs'"
   },
   "devDependencies": {
-    "purescript": "^0.14.0",
-    "purescript-language-server": "^0.12.7",
-    "purty": "^6.2.0",
-    "spago": "^0.19.1",
+    "purescript": "^0.14.3",
+    "purs-tidy": "^0.2.2",
+    "spago": "^0.20.0",
     "ssri": ">=8.0.1"
   }
 }

src/Biscotti/Cookie/Generator.purs

@@ -41,15 +41,15 @@ stringify :: Cookie -> String
 stringify cookie =
   intercalate "; "
     $ catMaybes
-        [ attr (getName cookie) $ Just (getValue cookie)
-        , attr domainTag $ getDomain cookie
-        , attr pathTag $ getPath cookie
-        , attr expiresTag $ formatDateTime <$> getExpires cookie
-        , attr maxAgeTag $ show <$> getMaxAge cookie
-        , attr sameSiteTag $ show <$> getSameSite cookie
-        , flag secureTag $ getSecure cookie
-        , flag httpOnlyTag $ getHttpOnly cookie
-        ]
+      [ attr (getName cookie) $ Just (getValue cookie)
+      , attr domainTag $ getDomain cookie
+      , attr pathTag $ getPath cookie
+      , attr expiresTag $ formatDateTime <$> getExpires cookie
+      , attr maxAgeTag $ show <$> getMaxAge cookie
+      , attr sameSiteTag $ show <$> getSameSite cookie
+      , flag secureTag $ getSecure cookie
+      , flag httpOnlyTag $ getHttpOnly cookie
+      ]
 
 attr :: String -> Maybe String -> Maybe String
 attr name = case _ of

src/Biscotti/Cookie/Types.purs

@@ -60,21 +60,20 @@ instance showSameSite :: Show SameSite where
   show Lax = "Lax"
   show None = "None"
 
-type CookieFields
-  = { name :: String
-    , value :: String
-    , domain :: Maybe String
-    , path :: Maybe String
-    , expires :: Maybe DateTime
-    , maxAge :: Maybe Int
-    , sameSite :: Maybe SameSite
-    , secure :: Boolean
-    , httpOnly :: Boolean
-    }
+type CookieFields =
+  { name :: String
+  , value :: String
+  , domain :: Maybe String
+  , path :: Maybe String
+  , expires :: Maybe DateTime
+  , maxAge :: Maybe Int
+  , sameSite :: Maybe SameSite
+  , secure :: Boolean
+  , httpOnly :: Boolean
+  }
 
 -- | The `Cookie` type
-newtype Cookie
-  = Cookie CookieFields
+newtype Cookie = Cookie CookieFields
 
 derive newtype instance eqCookie :: Eq Cookie
 
@@ -105,8 +104,8 @@ fromFields = Cookie
 expire :: Cookie -> Effect (Either String Cookie)
 expire cookie = do
   now <- nowDateTime
-  let
-    maybeDate = DateTime.adjust (Days $ -1.0) now
+  let maybeDate = DateTime.adjust (Days $ -1.0) now
+
   case maybeDate of
     Nothing -> pure $ Left "Invalid date"
     Just yesterday -> pure $ Right $ setExpires yesterday cookie