diff options
Diffstat (limited to 'Git/Remote')
| -rw-r--r-- | Git/Remote/Remove.hs | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/Git/Remote/Remove.hs b/Git/Remote/Remove.hs new file mode 100644 index 000000000..949019b22 --- /dev/null +++ b/Git/Remote/Remove.hs @@ -0,0 +1,27 @@ +{- git remote stuff + - + - Copyright 2012 Joey Hess <joey@kitenet.net> + - + - Licensed under the GNU GPL version 3 or higher. + -} + +{-# LANGUAGE CPP #-} + +module Git.Remote.Remove where + +import Common +import Git +import Git.Types +import qualified Git.Command +import qualified Git.BuildVersion + +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 + ] |