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 | 4d376b47b7aa506c4f4a4c5ccc83ca2ef1aeacc2 (patch) | |
tree | 33ab2e7c4b72d8a7fce40a0e93f63f3d50a6c3ab /Remote/Bup.hs | |
parent | f672c39279366a8927abfcde3050952365f5e0ee (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 'Remote/Bup.hs')
-rw-r--r-- | Remote/Bup.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Remote/Bup.hs b/Remote/Bup.hs index 77d506d7c..f5c802e09 100644 --- a/Remote/Bup.hs +++ b/Remote/Bup.hs @@ -257,7 +257,7 @@ bup2GitRemote r where bits = split ":" r host = Prelude.head bits - dir = join ":" $ drop 1 bits + dir = intercalate ":" $ drop 1 bits -- "host:~user/dir" is not supported specially by bup; -- "host:dir" is relative to the home directory; -- "host:" goes in ~/.bup |