diff options
| -rw-r--r-- | Command/Map.hs | 4 | ||||
| -rw-r--r-- | Remote/GitRemote.hs | 5 |
2 files changed, 6 insertions, 3 deletions
diff --git a/Command/Map.hs b/Command/Map.hs index 4ae947b15..6206aeeb5 100644 --- a/Command/Map.hs +++ b/Command/Map.hs @@ -16,7 +16,7 @@ import Data.List.Utils import Command import qualified Annex import qualified GitRepo as Git -import qualified Remotes +import qualified Remote.GitRemote import Messages import Types import Utility @@ -203,7 +203,7 @@ tryScan r Git.hConfigRead r configlist = - Remotes.onRemote r (pipedconfig, Nothing) "configlist" [] + Remote.GitRemote.onRemote r (pipedconfig, Nothing) "configlist" [] manualconfiglist = do let sshcmd = "cd " ++ shellEscape(Git.workTree r) ++ " && " ++ diff --git a/Remote/GitRemote.hs b/Remote/GitRemote.hs index 0ec0c70e8..8671ef7fa 100644 --- a/Remote/GitRemote.hs +++ b/Remote/GitRemote.hs @@ -5,7 +5,10 @@ - Licensed under the GNU GPL version 3 or higher. -} -module Remote.GitRemote (generate) where +module Remote.GitRemote ( + generate, + onRemote +) where import Control.Exception.Extensible import Control.Monad.State (liftIO) |