diff options
Diffstat (limited to 'Remote')
| -rw-r--r-- | Remote/Directory.hs | 2 | ||||
| -rw-r--r-- | Remote/Git.hs | 2 | ||||
| -rw-r--r-- | Remote/Hook.hs | 2 | ||||
| -rw-r--r-- | Remote/Rsync.hs | 2 | ||||
| -rw-r--r-- | Remote/Web.hs | 2 |
5 files changed, 5 insertions, 5 deletions
diff --git a/Remote/Directory.hs b/Remote/Directory.hs index 16535070e..e6deee4bf 100644 --- a/Remote/Directory.hs +++ b/Remote/Directory.hs @@ -56,7 +56,7 @@ gen r u c gc = do whereisKey = Nothing, remoteFsck = Nothing, repairRepo = Nothing, - config = M.empty, + config = c, repo = r, gitconfig = gc, localpath = Just dir, diff --git a/Remote/Git.hs b/Remote/Git.hs index ba247078b..d4e5987dc 100644 --- a/Remote/Git.hs +++ b/Remote/Git.hs @@ -120,7 +120,7 @@ gen r u c gc , repairRepo = if Git.repoIsUrl r then Nothing else Just $ repairRemote r - , config = M.empty + , config = c , localpath = localpathCalc r , repo = r , gitconfig = gc diff --git a/Remote/Hook.hs b/Remote/Hook.hs index fdb24d0cb..55ff78514 100644 --- a/Remote/Hook.hs +++ b/Remote/Hook.hs @@ -54,7 +54,7 @@ gen r u c gc = do whereisKey = Nothing, remoteFsck = Nothing, repairRepo = Nothing, - config = M.empty, + config = c, localpath = Nothing, repo = r, gitconfig = gc, diff --git a/Remote/Rsync.hs b/Remote/Rsync.hs index 6bc5fd78f..91638de98 100644 --- a/Remote/Rsync.hs +++ b/Remote/Rsync.hs @@ -81,7 +81,7 @@ gen r u c gc = do , whereisKey = Nothing , remoteFsck = Nothing , repairRepo = Nothing - , config = M.empty + , config = c , repo = r , gitconfig = gc , localpath = if islocal diff --git a/Remote/Web.hs b/Remote/Web.hs index 7c98dbf40..9af80a776 100644 --- a/Remote/Web.hs +++ b/Remote/Web.hs @@ -58,7 +58,7 @@ gen r _ _ gc = whereisKey = Just getUrls, remoteFsck = Nothing, repairRepo = Nothing, - config = M.empty, + config = c, gitconfig = gc, localpath = Nothing, repo = r, |