diff options
| author | Richard Hartmann <richih@debian.org> | 2015-12-15 23:26:04 -0700 |
|---|---|---|
| committer | Richard Hartmann <richih@debian.org> | 2015-12-15 23:26:04 -0700 |
| commit | d348ed3d2822a8cd4b777f74641baf040e7839e4 (patch) | |
| tree | 5d46d93d0b237a213f72e1e7ada60a5fecaf2e75 /Git/Remote.hs | |
| parent | ad444893f97ed69c4a5f070cb00a6e6cb89bb2cd (diff) | |
| parent | 3b6310081cde4333494fb1271a7570fc8e5f333a (diff) | |
| download | git-repair-d348ed3d2822a8cd4b777f74641baf040e7839e4.tar.gz | |
Record git-repair (1.20151215-1) in archive suite sid
Diffstat (limited to 'Git/Remote.hs')
| -rw-r--r-- | Git/Remote.hs | 15 |
1 files changed, 1 insertions, 14 deletions
diff --git a/Git/Remote.hs b/Git/Remote.hs index 7e8e5f8..717b540 100644 --- a/Git/Remote.hs +++ b/Git/Remote.hs @@ -1,6 +1,6 @@ {- git remote stuff - - - Copyright 2012 Joey Hess <joey@kitenet.net> + - Copyright 2012 Joey Hess <id@joeyh.name> - - Licensed under the GNU GPL version 3 or higher. -} @@ -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 |