mirror of
https://github.com/unisonweb/unison.git
synced 2024-09-23 16:28:02 +03:00
one straggler
This commit is contained in:
parent
35b40f0fda
commit
b7b00c3de7
@ -160,8 +160,7 @@ prepareTranscriptDir inFork mcodepath = do
|
||||
pure()
|
||||
|
||||
when inFork $ FileCodebase.getCodebaseOrExit mcodepath >> do
|
||||
origCodePath <- FileCodebase.getCodebaseDir mcodepath
|
||||
let path = origCodePath
|
||||
path <- FileCodebase.getCodebaseDir mcodepath
|
||||
PT.putPrettyLn $ P.lines [
|
||||
P.wrap "Transcript will be run on a copy of the codebase at: ", "",
|
||||
P.indentN 2 (P.string path)
|
||||
|
Loading…
Reference in New Issue
Block a user