Autoformatter is an entity that formats itself

purescript · Feb 9, 2025 · e43ca29 · e43ca29
1 parent 6642029
commit e43ca29
Show file tree

Hide file tree

Showing 3 changed files with 16 additions and 13 deletions.
diff --git a/core/src/Log.purs b/core/src/Log.purs
@@ -76,6 +76,7 @@ data LogVerbosity
   = LogQuiet
   | LogNormal
   | LogVerbose
+
 derive instance Eq LogVerbosity
 
 -- | LogVeryVerbose -- TODO:we'll need to add timestamps, and locations, see https://stackoverflow.com/questions/45395369/

diff --git a/docs-search/index/src/Docs/Search/IndexBuilder.purs b/docs-search/index/src/Docs/Search/IndexBuilder.purs
@@ -108,11 +108,11 @@ run cfg@{ log } = do
 
   sequential $
     parallel (writeIndex cfg index)
-    *> parallel (writeTypeIndex typeIndex)
-    *> parallel (writePackageInfo packageInfo)
-    *> parallel (writeModuleIndex moduleIndex)
-    *> parallel (patchDocs cfg)
-    *> parallel (copyAppFile cfg)
+      *> parallel (writeTypeIndex typeIndex)
+      *> parallel (writePackageInfo packageInfo)
+      *> parallel (writeModuleIndex moduleIndex)
+      *> parallel (patchDocs cfg)
+      *> parallel (copyAppFile cfg)
 
   let
     countOfDefinitions = Trie.size $ unwrap index
@@ -365,8 +365,9 @@ createDirectories { generatedDocs, die } = do
 copyAppFile :: Config -> Aff Unit
 copyAppFile { generatedDocs, die } = do
   appFile <- liftEffect getDocsSearchAppPath
-  unlessM (fileExists appFile) $
-    die $
+  unlessM (fileExists appFile)
+    $ die
+    $
       "Client-side app was not found at " <> appFile <> ".\n" <>
         "Check your installation."
   buffer <- readFile appFile

diff --git a/src/Spago/Purs.purs b/src/Spago/Purs.purs
@@ -110,12 +110,13 @@ printDocsFormat = case _ of
   Ctags -> "ctags"
   Etags -> "etags"
 
-docs :: ∀ a.
-  { root :: RootPath
-  , globs :: Set LocalPath
-  , format :: DocsFormat
-  , quiet :: Boolean
-  }
+docs
+  :: ∀ a
+   . { root :: RootPath
+     , globs :: Set LocalPath
+     , format :: DocsFormat
+     , quiet :: Boolean
+     }
   -> Spago (PursEnv a) (Either ExecaResult ExecaResult)
 docs cfg = do
   { purs } <- ask