registerurl: Allow it to be used in a bare repository.
This commit is contained in:
parent
06665d733a
commit
97ae474585
2 changed files with 5 additions and 5 deletions
|
@ -15,11 +15,10 @@ import Command.FromKey (keyOpt)
|
|||
import qualified Remote
|
||||
|
||||
cmd :: Command
|
||||
cmd = notBareRepo $
|
||||
command "registerurl"
|
||||
SectionPlumbing "registers an url for a key"
|
||||
(paramPair paramKey paramUrl)
|
||||
(seek <$$> optParser)
|
||||
cmd = command "registerurl"
|
||||
SectionPlumbing "registers an url for a key"
|
||||
(paramPair paramKey paramUrl)
|
||||
(seek <$$> optParser)
|
||||
|
||||
data RegisterUrlOptions = RegisterUrlOptions
|
||||
{ keyUrlPairs :: CmdParams
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue