diff options
| author |  Joey Hess <joey@kitenet.net> | 2013-10-27 15:38:59 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2013-10-27 15:38:59 -0400 |
| commit | 73d1f889c0b6d63fefcc3296bcd0402b1caed419 (patch) | |
| tree | 83a383a64477bdc3c1e64b2fc60ae2db81f475b3 /Assistant/Alert.hs | |
| parent | ab9fbc09ed26e5e18ce0097236c41bb34f04d16c (diff) | |
assistant: Support repairing git remotes that are locally accessible
(eg, on removable drives)
gcrypt remotes are not yet handled.
This commit was sponsored by Sören Brunk.
Diffstat (limited to 'Assistant/Alert.hs')
| -rw-r--r-- | Assistant/Alert.hs | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/Assistant/Alert.hs b/Assistant/Alert.hs index 7e47e8396..9e248571d 100644 --- a/Assistant/Alert.hs +++ b/Assistant/Alert.hs @@ -177,6 +177,12 @@ fsckAlert button n = baseActivityAlert brokenRepositoryAlert :: AlertButton -> Alert brokenRepositoryAlert = errorAlert "Serious problems have been detected with your repository. This needs your immediate attention!" +repairingAlert :: String -> Alert +repairingAlert repodesc = activityAlert Nothing + [ Tensed "Attempting to repair" "Repaired" + , UnTensed $ T.pack repodesc + ] + pairingAlert :: AlertButton -> Alert pairingAlert button = baseActivityAlert { alertData = [ UnTensed "Pairing in progress" ] |