split BranchChange and lifted
This commit is contained in:
parent
0c584bf70d
commit
39a3adf434
5 changed files with 29 additions and 13 deletions
|
@ -66,7 +66,7 @@ onAdd :: Handler
|
|||
onAdd file
|
||||
| ".lock" `isSuffixOf` file = noop
|
||||
| isAnnexBranch file = do
|
||||
branchChanged <<~ branchChangeHandle
|
||||
branchChanged
|
||||
transferqueue <- getAssistant transferQueue
|
||||
dstatus <- getAssistant daemonStatusHandle
|
||||
liftAnnex $
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue