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

avoid first person

Browse source
This commit is contained in:
Joey Hess 2012-07-29 22:18:58 -04:00
parent 895b068e35
commit 74cf65a4dd
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
Assistant/Alert.hs
View file

@ -97,7 +97,7 @@ syncMountAlert :: FilePath -> [Remote] -> Alert
syncMountAlert dir rs = baseActivityAlert syncMountAlert dir rs = baseActivityAlert
{ alertHeader = Just $ "Syncing with " ++ unwords (map Remote.name rs) { alertHeader = Just $ "Syncing with " ++ unwords (map Remote.name rs)
, alertMessage = StringAlert $ unwords , alertMessage = StringAlert $ unwords
["I noticed you plugged in" ["You plugged in"
, dir , dir
, " -- let's get it in sync!" , " -- let's get it in sync!"
] ]
@ -117,7 +117,7 @@ scanAlert r = baseActivityAlert
sanityCheckAlert :: Alert sanityCheckAlert :: Alert
sanityCheckAlert = activityAlert (Just "Running daily sanity check") sanityCheckAlert = activityAlert (Just "Running daily sanity check")
"to make sure I've not missed anything." "to make sure everything is ok."
sanityCheckFixAlert :: String -> Alert sanityCheckFixAlert :: String -> Alert
sanityCheckFixAlert msg = Alert sanityCheckFixAlert msg = Alert