mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

add alert when committing

Browse source
This commit is contained in:
Joey Hess 2012-08-02 14:02:35 -04:00
parent e21a32627f
commit 74fc9fcbe6
2 changed files with 6 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
Assistant/Alert.hs
View file

@ -189,6 +189,9 @@ activityAlert header message = baseActivityAlert
startupScanAlert :: Alert
startupScanAlert = activityAlert Nothing "Performing startup scan"
commitAlert :: Alert
commitAlert = activityAlert Nothing "Committing changes to git"
pushAlert :: [Remote] -> Alert
pushAlert rs = activityAlert Nothing $
"Syncing with " ++ unwords (map Remote.name rs)