Skip to content

Commit

Permalink
purs-tidy format-in-place src/**/*.purs test/**/*.purs
Browse files Browse the repository at this point in the history
  • Loading branch information
srghma committed Oct 10, 2024
1 parent 75ee363 commit 050956e
Show file tree
Hide file tree
Showing 2 changed files with 5 additions and 5 deletions.
4 changes: 2 additions & 2 deletions src/GitHub/Actions/ToolCache.purs
Original file line number Diff line number Diff line change
Expand Up @@ -186,7 +186,7 @@ extractXar =
Nothing, Nothing -> runEffectFn1 extractXar1Impl file
Just d, Nothing -> runEffectFn2 extractXar2Impl file d
Nothing, Just f -> runEffectFn2 extractXar2Impl2 file f
Just d, Just f -> runEffectFn3 extractXar3Impl file d f
Just d, Just f -> runEffectFn3 extractXar3Impl file d f

foreign import extractZip1Impl :: EffectFn1 FilePath (Promise FilePath)

Expand Down Expand Up @@ -230,7 +230,7 @@ type CacheDirArgs =
}

-- | Caches a directory and installs it into the tool cacheDir
cacheDir' :: { sourceDir :: String, tool :: String , version :: String } -> ExceptT Error Aff FilePath
cacheDir' :: { sourceDir :: String, tool :: String, version :: String } -> ExceptT Error Aff FilePath
cacheDir' { sourceDir, tool, version } = cacheDir { sourceDir, tool, version, arch: Nothing }

-- | Caches a directory and installs it into the tool cacheDir
Expand Down
6 changes: 3 additions & 3 deletions test/Test/Main.purs
Original file line number Diff line number Diff line change
Expand Up @@ -58,7 +58,7 @@ main = do
_ <- Cache.restoreCache' { paths: [], primaryKey: "restorecache" }
_ <- Cache.restoreCache { paths: [], primaryKey: "restorecache", restoreKeys: Nothing, options: Nothing }
_ <- Cache.restoreCache { paths: [], primaryKey: "restorecache", restoreKeys: Just [ "a" ], options: Nothing }
Cache.restoreCache { paths: [], primaryKey: "restorecaceh", restoreKeys: Just [ "a" ], options: Just (Cache.defaultDownloadOptions { useAzureSdk = Just true, downloadConcurrency = Just true, timeoutInMs = Just 10.0 })}
Cache.restoreCache { paths: [], primaryKey: "restorecaceh", restoreKeys: Just [ "a" ], options: Just (Cache.defaultDownloadOptions { useAzureSdk = Just true, downloadConcurrency = Just true, timeoutInMs = Just 10.0 }) }

-- Tests for GitHub.Actions.Exec
let
Expand All @@ -68,7 +68,7 @@ main = do
runAff_ execCb $ runExceptT do
_ <- Exec.exec' "pwd"
_ <- Exec.exec { command: "pwd", args: Just [ "-L" ], options: Nothing }
Exec.exec { command: "pwd", args: Just [ "-L" ], options: Just (Exec.defaultExecOptions { delay = Just 10.0 })}
Exec.exec { command: "pwd", args: Just [ "-L" ], options: Just (Exec.defaultExecOptions { delay = Just 10.0 }) }

-- Tests for GitHub.Actions.IO
let
Expand All @@ -78,7 +78,7 @@ main = do
runAff_ ioCb $ runExceptT do
_ <- Exec.exec' "touch test.txt"
_ <- IO.cp' { source: "test.txt", dest: "test1.txt" }
_ <- IO.cp { source: "test1.txt", dest: "test2.txt", options: Just (IO.defaultCopyOptions { force = Just true })}
_ <- IO.cp { source: "test1.txt", dest: "test2.txt", options: Just (IO.defaultCopyOptions { force = Just true }) }
_ <- IO.mv' { source: "test2.txt", dest: "test3.txt" }
_ <- IO.mv { source: "test3.txt", dest: "test4.txt", options: Just (IO.defaultMoveOptions { force = Just true }) }
_ <- IO.rmRF { inputPath: "test4.txt" }
Expand Down

0 comments on commit 050956e

Please sign in to comment.