avoid displaying alert when syncing only to removable drives and all not attached

This commit is contained in:
Joey Hess 2013-03-27 14:25:49 -04:00
parent f8707b6d3b
commit a87e046049
2 changed files with 5 additions and 3 deletions

View file

@ -167,8 +167,10 @@ syncAction rs a
failed <- a rs
let failed' = filter (not . Git.repoIsLocalUnknown . Remote.repo) failed
let succeeded = filter (`notElem` failed) nonxmppremotes
updateAlertMap $ mergeAlert i $
syncResultAlert succeeded failed'
if null succeeded && null failed'
then removeAlert i
else updateAlertMap $ mergeAlert i $
syncResultAlert succeeded failed'
return failed
where
nonxmppremotes = filter (not . isXMPPRemote) rs

View file

@ -1,5 +1,5 @@
Name: git-annex
Version: 4.20130323
Version: 4.20130324
Cabal-Version: >= 1.8
License: GPL
Maintainer: Joey Hess <joey@kitenet.net>