diff options
| author |  Joey Hess <joey@kitenet.net> | 2012-08-02 14:02:35 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2012-08-02 14:02:35 -0400 |
| commit | 74fc9fcbe68ce7802d44499e8b5dc5c5d186ee66 (patch) | |
| tree | 873acc0b816f65c3b7c00cd1bed548ed40916298 /Assistant/Alert.hs | |
| parent | e21a32627fc600e6f7fa72929c95cfb49390dae3 (diff) | |
add alert when committing
Diffstat (limited to 'Assistant/Alert.hs')
| -rw-r--r-- | Assistant/Alert.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/Assistant/Alert.hs b/Assistant/Alert.hs index 16ce222ad..b152c48dc 100644 --- a/Assistant/Alert.hs +++ b/Assistant/Alert.hs @@ -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) |