comment
This commit is contained in:
parent
1b0747c8b5
commit
7fcf4edeba
|
@ -237,6 +237,7 @@ spin hn hst = do
|
||||||
sendMarked toh marker s
|
sendMarked toh marker s
|
||||||
return True
|
return True
|
||||||
|
|
||||||
|
-- Initial git clone, used for bootstrapping.
|
||||||
sendGitClone :: HostName -> String -> IO ()
|
sendGitClone :: HostName -> String -> IO ()
|
||||||
sendGitClone hn url = void $ actionMessage ("Pushing git repository to " ++ hn) $ do
|
sendGitClone hn url = void $ actionMessage ("Pushing git repository to " ++ hn) $ do
|
||||||
branch <- getCurrentBranch
|
branch <- getCurrentBranch
|
||||||
|
|
Loading…
Reference in New Issue