diff options
author | Joey Hess <joey@kitenet.net> | 2013-04-22 20:24:53 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2013-04-22 20:24:53 -0400 |
commit | 8a2d1988d3b2f1ba3abd0318aa98249d366efa6f (patch) | |
tree | ef2edb61735514bbbad8c651ed5e02daf30542eb /Messages.hs | |
parent | 2a84deb271d7735aff93dbf000f308fa0fc63216 (diff) |
expose Control.Monad.join
I think I've been looking for that function for some time.
Ie, I remember wanting to collapse Just Nothing to Nothing.
Diffstat (limited to 'Messages.hs')
-rw-r--r-- | Messages.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Messages.hs b/Messages.hs index cc82b90505..68bd926739 100644 --- a/Messages.hs +++ b/Messages.hs @@ -179,7 +179,7 @@ fileNotFound file = do [ "git-annex:", file, "not found" ] indent :: String -> String -indent = join "\n" . map (\l -> " " ++ l) . lines +indent = intercalate "\n" . map (\l -> " " ++ l) . lines {- Shows a JSON fragment only when in json mode. -} maybeShowJSON :: JSON a => [(String, a)] -> Annex () |