git-annex-shell now exclusively used for all remote access
This commit is contained in:
parent
30e0065ab9
commit
700aed13cf
6 changed files with 102 additions and 125 deletions
|
@ -34,5 +34,9 @@ start keyname = do
|
|||
|
||||
ok <- getViaTmp key (liftIO . rsyncServerReceive)
|
||||
if ok
|
||||
then return Nothing
|
||||
then do
|
||||
-- forcibly quit after receiving one key,
|
||||
-- and shutdown cleanly so queued git commands run
|
||||
_ <- shutdown 0
|
||||
liftIO exitSuccess
|
||||
else liftIO exitFailure
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue