Remotes can now be made read-only, by setting remote.<name>.annex-readonly
This commit is contained in:
parent
7d5568485f
commit
f7727d2df1
7 changed files with 45 additions and 3 deletions
|
@ -123,7 +123,8 @@ reconnectRemotes notifypushes rs = void $ do
|
|||
pushToRemotes :: Bool -> [Remote] -> Assistant [Remote]
|
||||
pushToRemotes notifypushes remotes = do
|
||||
now <- liftIO getCurrentTime
|
||||
syncAction remotes (pushToRemotes' now notifypushes)
|
||||
let remotes' = filter (not . remoteAnnexReadOnly . Remote.gitconfig) remotes
|
||||
syncAction remotes' (pushToRemotes' now notifypushes)
|
||||
pushToRemotes' :: UTCTime -> Bool -> [Remote] -> Assistant [Remote]
|
||||
pushToRemotes' now notifypushes remotes = do
|
||||
(g, branch, u) <- liftAnnex $ do
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue