diff options
author | Joey Hess <joey@kitenet.net> | 2014-11-10 12:06:29 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2014-11-10 12:06:29 -0400 |
commit | b68c7d9c0fd13df235788bc37c3df67e7595a092 (patch) | |
tree | 954079b8c989a94c1f51212a6fcd76cf64b50b21 /Git/Remote.hs | |
parent | dfa10d228f66e9dab87f80cfb1b7ca6261e87d8b (diff) | |
download | git-repair-b68c7d9c0fd13df235788bc37c3df67e7595a092.tar.gz |
merge from git-annex
Diffstat (limited to 'Git/Remote.hs')
-rw-r--r-- | Git/Remote.hs | 13 |
1 files changed, 0 insertions, 13 deletions
diff --git a/Git/Remote.hs b/Git/Remote.hs index 7e8e5f8..156e308 100644 --- a/Git/Remote.hs +++ b/Git/Remote.hs @@ -12,8 +12,6 @@ module Git.Remote where import Common import Git import Git.Types -import qualified Git.Command -import qualified Git.BuildVersion import Data.Char import qualified Data.Map as M @@ -44,17 +42,6 @@ makeLegalName s = case filter legal $ replace "/" "_" s of legal '.' = True legal c = isAlphaNum c -remove :: RemoteName -> Repo -> IO () -remove remotename = Git.Command.run - [ Param "remote" - -- name of this subcommand changed - , Param $ - if Git.BuildVersion.older "1.8.0" - then "rm" - else "remove" - , Param remotename - ] - data RemoteLocation = RemoteUrl String | RemotePath FilePath remoteLocationIsUrl :: RemoteLocation -> Bool |