From 6f29afe36b5f8b4233d4b5c7df582348b869bb01 Mon Sep 17 00:00:00 2001 From: Chris Penner Date: Tue, 4 Jan 2022 16:53:17 -0600 Subject: [PATCH] Update parser-typechecker/src/Unison/Codebase/SqliteCodebase.hs Co-authored-by: Arya Irani <538571+aryairani@users.noreply.github.com> --- parser-typechecker/src/Unison/Codebase/SqliteCodebase.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/parser-typechecker/src/Unison/Codebase/SqliteCodebase.hs b/parser-typechecker/src/Unison/Codebase/SqliteCodebase.hs index 62b1defd0..903225311 100644 --- a/parser-typechecker/src/Unison/Codebase/SqliteCodebase.hs +++ b/parser-typechecker/src/Unison/Codebase/SqliteCodebase.hs @@ -1205,7 +1205,7 @@ pushGitBranch srcConn branch repo (PushGitBranchOpts setRoot _syncMode) = Unlift gitIn remotePath ["push", "--quiet", url] pure True --- | Make a clean copy of the connected codebase into the provided path. +-- | Make a clean copy of the connected codebase into the provided path. Destroys any existing `v2/` directory copyCodebase :: MonadIO m => Connection -> CodebasePath -> m () copyCodebase srcConn destPath = runDB srcConn $ do -- remove any existing codebase at the destination location.