revert broken change that prevented saving changes to local repo
People who get annoyed at not being able to edit "here" can send me a patch, I don't have time for this nonsense.
This commit is contained in:
parent
9775fad542
commit
f651b87bbd
3 changed files with 3 additions and 9 deletions
|
@ -134,8 +134,7 @@ setRepoConfig uuid mremote oldc newc = do
|
|||
|
||||
editRepositoryAForm :: Bool -> RepoConfig -> MkAForm RepoConfig
|
||||
editRepositoryAForm ishere def = RepoConfig
|
||||
<$> areq (if ishere then disabledTextField else textField)
|
||||
"Name" (Just $ repoName def)
|
||||
<$> areq textField "Name" (Just $ repoName def)
|
||||
<*> aopt textField "Description" (Just $ repoDescription def)
|
||||
<*> areq (selectFieldList groups `withNote` help) "Repository group" (Just $ repoGroup def)
|
||||
<*> associateddirectory
|
||||
|
|
|
@ -33,13 +33,6 @@ textField = F.textField
|
|||
|]
|
||||
}
|
||||
|
||||
disabledTextField :: MkField Text
|
||||
disabledTextField = F.textField
|
||||
{ fieldView = \theId name attrs val _isReq -> [whamlet|
|
||||
<input id="#{theId}" name="#{name}" *{attrs} type="text" value="#{either id id val}" disabled="true">
|
||||
|]
|
||||
}
|
||||
|
||||
{- Also without required attribute. -}
|
||||
passwordField :: MkField Text
|
||||
passwordField = F.passwordField
|
||||
|
|
|
@ -9,3 +9,5 @@ It highlights the (now empty) name field, and says "value is required".
|
|||
### What version of git-annex are you using? On what operating system?
|
||||
git-annex version: 4.20130618-g333cb8e
|
||||
Ubuntu 13.04
|
||||
|
||||
> [[fixed|done]] --[[Joey]]
|
||||
|
|
Loading…
Reference in a new issue